Remove unused code

[rrq/jonasforth.git] / main.asm

diff --git a/main.asm b/main.asm
index c5758d8b23adfc1104682493de7efebd39634fc3..626de1610f6d360e0331ce54ea12338f194bc84e 100644 (file)
--- a/main.asm
+++ b/main.asm
@@ -86,13 +86,6 @@ HELLO:
     dq EMIT
     dq exit
 
-PROGRAM:
-    dq docol
-    dq HELLO
-    dq HELLO
-    dq HELLO
-    dq exit
-
 segment readable writable
 
 ;; Return stack