From 1a6d14e39e922c1adbf4485483b4e3df4861ae26 Mon Sep 17 00:00:00 2001 From: CrossNox Date: Mon, 28 Nov 2022 23:37:32 -0300 Subject: [PATCH] add pushfi --- src/rustint/core.clj | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/src/rustint/core.clj b/src/rustint/core.clj index e8b5ef8..4575295 100644 --- a/src/rustint/core.clj +++ b/src/rustint/core.clj @@ -1886,6 +1886,10 @@ ADD (let [res (aplicar-operador-diadico + pila)] (if (nil? res) res (recur cod regs-de-act (inc cont-prg) res mapa-regs))) + ; PUSHFI: PUSH FROM INSTRUCTION. Direccionamiento inmediato. Incrementa cont-prg en 1 y agrega al final de pila el valor del argumento. + PUSHFI (let [res (conj pila (second fetched)) + (recur cod regs-de-act (inc cont-prg) res mapa-regs) + ]) ) ) )