diff --git a/src/rustint/core.clj b/src/rustint/core.clj index b8b9e31..2f73d09 100644 --- a/src/rustint/core.clj +++ b/src/rustint/core.clj @@ -1916,6 +1916,10 @@ POPMULREF (let [res (asignar-aritmetico-ref regs-de-act pila reg-actual fetched *)] (if (nil? res) res (recur cod res (inc cont-prg) (vec (butlast pila)) mapa-regs))) + ; POPDIVREF: Como POPADDREF, pero divide. + 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))) + ; 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]