add not

src/rustint/core.clj

@@ -1890,6 +1890,15 @@
           PUSHFI (let [res (conj pila (second fetched))
                        (recur cod regs-de-act (inc cont-prg) res mapa-regs)
                       ])
+
+
+          ; NOT: Incrementa cont-prg en 1, quita de la pila un elemento booleano, lo niega y lo coloca al final de la pila.
+          NOT (let [
+                  res (not (last pila)),
+                  nueva_pila (assoc pila (count pila) res)
+                ]
+                  (recur cod regs-de-act (inc cont-prg) nueva_pila mapa-regs)
+              )
        )
   )
 )