agrego flush

src/rustint/core.clj

@@ -2010,6 +2010,17 @@
                   (recur cod regs-de-act (inc cont-prg) nueva_pila mapa-regs)
           )
 
+          ; ABS: Incrementa cont-prg en 1, quita de la pila un elemento numerico, calcula su valor absoluto y lo coloca al final de la pila.
+          ABS (let [
+                    res (Math/abs (last pila)),
+                    nueva_pila (assoc pila (- (count pila) 1) res)
+                ]
+                  (recur cod regs-de-act (inc cont-prg) nueva_pila mapa-regs)
+          )
+
+          ; FLUSH: Purga la salida e incrementa cont-prg en 1.
+          (do (flush) (recur cod regs-de-act (inc cont-prg) pila mapa-regs))
+
 
        )
   )