agrego popmodref

master
CrossNox 3 years ago
parent f79b7ff3c1
commit 15a4b4e570
  1. 4
      src/rustint/core.clj

@ -1920,6 +1920,10 @@
POPDIVREF (let [res (asignar-aritmetico-ref regs-de-act pila reg-actual fetched dividir)] 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))) (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 ; Incrementa cont-prg en 1, quita de la pila dos elementos, calcula su suma y la coloca al final de la pila
; fetched: ADD ; fetched: ADD
; pila recibida: [1 0 0 3 4] ; pila recibida: [1 0 0 3 4]

Loading…
Cancel
Save