|
|
|
|
@ -1927,6 +1927,10 @@ |
|
|
|
|
; EQ: Como ADD, pero calcula la operacion relacional = entre los dos valores. |
|
|
|
|
EQ (let [res (aplicar-operador-diadico = pila)] |
|
|
|
|
(if (nil? res) res (recur cod regs-de-act (inc cont-prg) res mapa-regs))) |
|
|
|
|
|
|
|
|
|
; NEQ: Como ADD, pero calcula la operacion relacional != entre los dos valores. |
|
|
|
|
NEQ (let [res (aplicar-operador-diadico not= pila)] |
|
|
|
|
(if (nil? res) res (recur cod regs-de-act (inc cont-prg) res mapa-regs))) |
|
|
|
|
) |
|
|
|
|
) |
|
|
|
|
) |
|
|
|
|
|