From 784d9be4350493f88740017e31654b81171a1327 Mon Sep 17 00:00:00 2001 From: CrossNox Date: Tue, 29 Nov 2022 00:03:28 -0300 Subject: [PATCH] add lte --- src/rustint/core.clj | 4 ++++ 1 file changed, 4 insertions(+) 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))) ) ) )