diff --git a/src/rustint/core.clj b/src/rustint/core.clj index 8bdfd2a..412b0a2 100644 --- a/src/rustint/core.clj +++ b/src/rustint/core.clj @@ -1943,6 +1943,10 @@ ; LT: Como ADD, pero calcula la operacion relacional < entre los dos valores. LT (let [res (aplicar-operador-diadico < pila)] (if (nil? res) res (recur cod regs-de-act (inc cont-prg) res mapa-regs))) + + ; LTE: Como ADD, pero calcula la operacion relacional <= entre los dos valores. + LTE (let [res (aplicar-operador-diadico <= pila)] + (if (nil? res) res (recur cod regs-de-act (inc cont-prg) res mapa-regs))) ) ) )