summary refs log tree commit diff
path: root/quine.asm
diff options
context:
space:
mode:
Diffstat (limited to 'quine.asm')
-rw-r--r--quine.asm50
1 files changed, 29 insertions, 21 deletions
diff --git a/quine.asm b/quine.asm
index 05e3fb3..e2703a4 100644
--- a/quine.asm
+++ b/quine.asm
@@ -2641,7 +2641,7 @@ cold_start:
   dq lit, 5, early_comma
   dq litstring, "unroll", early_find, entry_to_execution_token, early_comma
   dq litstring, "*", early_find, entry_to_execution_token, early_comma
-  dq litstring, "roll3", early_find, entry_to_execution_token, early_comma
+  dq litstring, "3roll", early_find, entry_to_execution_token, early_comma
   dq litstring, "lit", early_find, entry_to_execution_token, early_comma
   dq lit, 1, early_comma
   dq litstring, "+", early_find, entry_to_execution_token, early_comma
@@ -2817,7 +2817,7 @@ cold_start:
   dq lit, -1, early_comma
   dq litstring, "*", early_find, entry_to_execution_token, early_comma
   dq litstring, "litstring", early_find, entry_to_execution_token, early_comma
-  dq litstring, "-", early_comma
+  dq lit, "-", early_comma
   dq litstring, "emitstring", early_find, entry_to_execution_token
   dq early_comma
   dq litstring, "swap", early_find, entry_to_execution_token, early_comma
@@ -3160,7 +3160,8 @@ cold_start:
   dq early_comma
   dq litstring, "lit", early_find, entry_to_execution_token, early_comma
   dq lit, 1, early_comma
-  dq litstring, "sys-exit", early_find, entry_to_execution_token, early_comma
+  dq litstring, "sys-exit", 0, early_find, entry_to_execution_token
+  dq early_comma
   dq early_here, fetch, lit, 8, packalign, early_here_store
 
   dq litstring, "extrareg64", early_create, early_docol_codeword
@@ -3244,7 +3245,8 @@ cold_start:
   dq early_comma
   dq litstring, "lit", early_find, entry_to_execution_token, early_comma
   dq lit, 1, early_comma
-  dq litstring, "sys-exit", early_find, entry_to_execution_token, early_comma
+  dq litstring, "sys-exit", 0, early_find, entry_to_execution_token
+  dq early_comma
   dq early_here, fetch, lit, 8, packalign, early_here_store
 
   dq litstring, "reg32", early_create, early_docol_codeword
@@ -3328,7 +3330,8 @@ cold_start:
   dq early_comma
   dq litstring, "lit", early_find, entry_to_execution_token, early_comma
   dq lit, 1, early_comma
-  dq litstring, "sys-exit", early_find, entry_to_execution_token, early_comma
+  dq litstring, "sys-exit", 0, early_find, entry_to_execution_token
+  dq early_comma
   dq early_here, fetch, lit, 8, packalign, early_here_store
 
   dq litstring, "reg16", early_create, early_docol_codeword
@@ -3412,7 +3415,8 @@ cold_start:
   dq early_comma
   dq litstring, "lit", early_find, entry_to_execution_token, early_comma
   dq lit, 1, early_comma
-  dq litstring, "sys-exit", early_find, entry_to_execution_token, early_comma
+  dq litstring, "sys-exit", 0, early_find, entry_to_execution_token
+  dq early_comma
   dq early_here, fetch, lit, 8, packalign, early_here_store
 
   dq litstring, "reg8", early_create, early_docol_codeword
@@ -3496,7 +3500,8 @@ cold_start:
   dq early_comma
   dq litstring, "lit", early_find, entry_to_execution_token, early_comma
   dq lit, 1, early_comma
-  dq litstring, "sys-exit", early_find, entry_to_execution_token, early_comma
+  dq litstring, "sys-exit", 0, early_find, entry_to_execution_token
+  dq early_comma
   dq early_here, fetch, lit, 8, packalign, early_here_store
 
   dq litstring, "scalefield", early_create, early_docol_codeword
@@ -3548,7 +3553,8 @@ cold_start:
   dq early_comma
   dq litstring, "lit", early_find, entry_to_execution_token, early_comma
   dq lit, 1, early_comma
-  dq litstring, "sys-exit", early_find, entry_to_execution_token, early_comma
+  dq litstring, "sys-exit", 0, early_find, entry_to_execution_token
+  dq early_comma
   dq early_here, fetch, lit, 8, packalign, early_here_store
 
   dq litstring, "conditioncode", early_create, early_docol_codeword
@@ -3633,7 +3639,7 @@ cold_start:
   dq lit, 7, early_comma
   dq litstring, "exit", early_find, entry_to_execution_token, early_comma
   dq litstring, "dup", early_find, entry_to_execution_token, early_comma
-  dq litstring, ":cc-sign", early_find, entry_to_execution_token
+  dq litstring, ":cc-sign", 0, early_find, entry_to_execution_token
   dq early_comma
   dq litstring, "=", early_find, entry_to_execution_token, early_comma
   dq litstring, "0branch", early_find, entry_to_execution_token, early_comma
@@ -3653,7 +3659,7 @@ cold_start:
   dq lit, 9, early_comma
   dq litstring, "exit", early_find, entry_to_execution_token, early_comma
   dq litstring, "dup", early_find, entry_to_execution_token, early_comma
-  dq litstring, ":cc-even", early_find, entry_to_execution_token
+  dq litstring, ":cc-even", 0, early_find, entry_to_execution_token
   dq early_comma
   dq litstring, "=", early_find, entry_to_execution_token, early_comma
   dq litstring, "0branch", early_find, entry_to_execution_token, early_comma
@@ -3673,7 +3679,7 @@ cold_start:
   dq lit, 11, early_comma
   dq litstring, "exit", early_find, entry_to_execution_token, early_comma
   dq litstring, "dup", early_find, entry_to_execution_token, early_comma
-  dq litstring, ":cc-less", early_find, entry_to_execution_token
+  dq litstring, ":cc-less", 0, early_find, entry_to_execution_token
   dq early_comma
   dq litstring, "=", early_find, entry_to_execution_token, early_comma
   dq litstring, "0branch", early_find, entry_to_execution_token, early_comma
@@ -3721,7 +3727,8 @@ cold_start:
   dq early_comma
   dq litstring, "lit", early_find, entry_to_execution_token, early_comma
   dq lit, 1, early_comma
-  dq litstring, "sys-exit", early_find, entry_to_execution_token, early_comma
+  dq litstring, "sys-exit", 0, early_find, entry_to_execution_token
+  dq early_comma
   dq early_here, fetch, lit, 8, packalign, early_here_store
 
   ; This was "rex_w".
@@ -3831,7 +3838,8 @@ cold_start:
   dq early_comma
   dq litstring, "lit", early_find, entry_to_execution_token, early_comma
   dq lit, 1, early_comma
-  dq litstring, "sys-exit", early_find, entry_to_execution_token, early_comma
+  dq litstring, "sys-exit", 0, early_find, entry_to_execution_token
+  dq early_comma
   dq early_here, fetch, lit, 8, packalign, early_here_store
 
   ; This was "addressing_disp8_reg64".
@@ -3906,7 +3914,7 @@ cold_start:
   dq litstring, "emitstring", early_find, entry_to_execution_token
   dq early_comma
   dq lit, 1, early_comma
-  dq litstring, "sys-exit", early_find, entry_to_execution_token, early_comma
+  dq litstring, "sys-exit", 0, early_find, entry_to_execution_token, early_comma
   dq early_here, fetch, lit, 8, packalign, early_here_store
 
   ; This was "addressing_disp8_indexed_reg64".
@@ -3947,7 +3955,7 @@ cold_start:
   dq litstring, "reg8", early_find, entry_to_execution_token, early_comma
   dq litstring, "lit", early_find, entry_to_execution_token, early_comma
   dq lit, 3, early_comma
-  dq litstring, "unroll3", early_find, entry_to_execution_token, early_comma
+  dq litstring, "3unroll", early_find, entry_to_execution_token, early_comma
   dq litstring, "modrm", early_find, entry_to_execution_token, early_comma
   dq litstring, "exit", early_find, entry_to_execution_token, early_comma
   dq early_here, fetch, lit, 8, packalign, early_here_store
@@ -4037,7 +4045,7 @@ cold_start:
   dq litstring, "lit", early_find, entry_to_execution_token, early_comma
   dq lit, 0x89, early_comma
   dq litstring, "pack8", early_find, entry_to_execution_token, early_comma
-  dq litstring, "unroll3", early_find, entry_to_execution_token, early_comma
+  dq litstring, "3unroll", early_find, entry_to_execution_token, early_comma
   dq litstring, "swap", early_find, entry_to_execution_token, early_comma
   dq litstring, "reg64", early_find, entry_to_execution_token, early_comma
   dq litstring, "swap", early_find, entry_to_execution_token, early_comma
@@ -4119,7 +4127,7 @@ cold_start:
   dq litstring, "unroll", early_find, entry_to_execution_token, early_comma
   dq litstring, "3unroll", early_find, entry_to_execution_token, early_comma
   dq litstring, "swap", early_find, entry_to_execution_token, early_comma
-  dq litstring, "addressing-indexed-reg64", early_find
+  dq litstring, "addressing-indexed-reg64", 0, early_find
   dq entry_to_execution_token, early_comma
   dq litstring, "exit", early_find, entry_to_execution_token, early_comma
   dq early_here, fetch, lit, 8, packalign, early_here_store
@@ -4145,7 +4153,7 @@ cold_start:
   dq litstring, "unroll", early_find, entry_to_execution_token, early_comma
   dq litstring, "3unroll", early_find, entry_to_execution_token, early_comma
   dq litstring, "swap", early_find, entry_to_execution_token, early_comma
-  dq litstring, "addressing-indexed-reg64", early_find
+  dq litstring, "addressing-indexed-reg64", 0, early_find
   dq entry_to_execution_token, early_comma
   dq litstring, "exit", early_find, entry_to_execution_token, early_comma
   dq early_here, fetch, lit, 8, packalign, early_here_store
@@ -4179,7 +4187,7 @@ cold_start:
   dq litstring, "unroll", early_find, entry_to_execution_token, early_comma
   dq litstring, "3roll", early_find, entry_to_execution_token, early_comma
   dq litstring, "reg32", early_find, entry_to_execution_token, early_comma
-  dq litstring, "unroll3", early_find, entry_to_execution_token, early_comma
+  dq litstring, "3unroll", early_find, entry_to_execution_token, early_comma
   dq litstring, "addressing-disp8-reg64", early_find
   dq entry_to_execution_token, early_comma
   dq litstring, "exit", early_find, entry_to_execution_token, early_comma
@@ -4338,7 +4346,7 @@ cold_start:
   dq litstring, "lit", early_find, entry_to_execution_token, early_comma
   dq lit, 0x8A, early_comma
   dq litstring, "pack8", early_find, entry_to_execution_token, early_comma
-  dq litstring, "unroll3", early_find, entry_to_execution_token, early_comma
+  dq litstring, "3unroll", early_find, entry_to_execution_token, early_comma
   dq litstring, "reg8", early_find, entry_to_execution_token, early_comma
   dq litstring, "swap", early_find, entry_to_execution_token, early_comma
   dq litstring, "addressing-indirect-reg64", early_find
@@ -4417,7 +4425,7 @@ cold_start:
   dq litstring, "unroll", early_find, entry_to_execution_token, early_comma
   dq litstring, "3unroll", early_find, entry_to_execution_token, early_comma
   dq litstring, "swap", early_find, entry_to_execution_token, early_comma
-  dq litstring, "addressing-indexed-reg64", early_find
+  dq litstring, "addressing-indexed-reg64", 0, early_find
   dq entry_to_execution_token, early_comma
   dq litstring, "exit", early_find, entry_to_execution_token, early_comma
   dq early_here, fetch, lit, 8, packalign, early_here_store