add gte

src/rustint/core.clj

@@ -1935,6 +1935,10 @@
           ; GT:  Como ADD, pero calcula la operacion relacional > entre los dos valores.
           GT (let [res (aplicar-operador-diadico > pila)]
                    (if (nil? res) res (recur cod regs-de-act (inc cont-prg) res mapa-regs)))
+
+          ; GTE: Como ADD, pero calcula la operacion relacional >= entre los dos valores.
+          GTE (let [res (aplicar-operador-diadico >= pila)]
+                   (if (nil? res) res (recur cod regs-de-act (inc cont-prg) res mapa-regs)))
        )
   )
 )