|
|
|
@ -2021,7 +2021,8 @@ |
|
|
|
; FLUSH: Purga la salida e incrementa cont-prg en 1. |
|
|
|
; FLUSH: Purga la salida e incrementa cont-prg en 1. |
|
|
|
(do (flush) (recur cod regs-de-act (inc cont-prg) pila mapa-regs)) |
|
|
|
(do (flush) (recur cod regs-de-act (inc cont-prg) pila mapa-regs)) |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
; NL: New line. Imprime un salto de linea e incrementa cont-prg en 1. |
|
|
|
|
|
|
|
(do (println) (recur cod regs-de-act (inc cont-prg) pila mapa-regs)) |
|
|
|
) |
|
|
|
) |
|
|
|
) |
|
|
|
) |
|
|
|
) |
|
|
|
) |
|
|
|
|