From 15a4b4e57085d4b0cc5dc9155fdd39d8ea7ded5f Mon Sep 17 00:00:00 2001 From: CrossNox Date: Tue, 29 Nov 2022 05:58:50 -0300 Subject: [PATCH] agrego popmodref --- src/rustint/core.clj | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/src/rustint/core.clj b/src/rustint/core.clj index 2f73d09..a2d92ef 100644 --- a/src/rustint/core.clj +++ b/src/rustint/core.clj @@ -1920,6 +1920,10 @@ POPDIVREF (let [res (asignar-aritmetico-ref regs-de-act pila reg-actual fetched dividir)] (if (nil? res) res (recur cod res (inc cont-prg) (vec (butlast pila)) mapa-regs))) + ; POPMODREF: Como POPADDREF, pero calcula el resto de la division. + POPMODREF (let [res (asignar-aritmetico-ref regs-de-act pila reg-actual fetched rem)] + (if (nil? res) res (recur cod res (inc cont-prg) (vec (butlast pila)) mapa-regs))) + ; Incrementa cont-prg en 1, quita de la pila dos elementos, calcula su suma y la coloca al final de la pila ; fetched: ADD ; pila recibida: [1 0 0 3 4]