diff options
| author | Irene Knapp <ireneista@irenes.space> | 2026-05-28 21:34:03 -0700 |
|---|---|---|
| committer | Irene Knapp <ireneista@irenes.space> | 2026-05-28 21:34:03 -0700 |
| commit | a00f83c9446159eaf9ac817dfae5291cb226ab7a (patch) | |
| tree | 90370c1a9233c2da5b3ac99516918ea06b774cc6 /quine.asm | |
| parent | f8e9891ba4e528a79135af137f66b62c74ab53e7 (diff) | |
swap the parameters to "entry-flags!"
Force-Push: yes Change-Id: I11f3eb1079d27a7306d6ed1e8e4b9fd6fb7d3a4a
Diffstat (limited to 'quine.asm')
| -rw-r--r-- | quine.asm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/quine.asm b/quine.asm index 6027e5e..ab742a0 100644 --- a/quine.asm +++ b/quine.asm @@ -5798,9 +5798,7 @@ cold_start: dq early_here, fetch, lit, 8, packalign, early_here_store ; This was "store_entry_flags". - ; TODO these parameters are in a counterintuitive order, swap them dq litstring, "entry-flags!", early_create, early_docol_codeword - dq litstring, "swap", early_find, entry_to_execution_token, early_comma dq litstring, "lit", early_find, entry_to_execution_token, early_comma dq lit, 8, early_comma dq litstring, "+", early_find, entry_to_execution_token, early_comma @@ -7723,6 +7721,7 @@ cold_start: dq litstring, "lit", early_find, entry_to_execution_token, early_comma dq lit, 0x80, early_comma dq litstring, "|", early_find, entry_to_execution_token, early_comma + dq litstring, "swap", early_find, entry_to_execution_token, early_comma dq litstring, "entry-flags!", early_find, entry_to_execution_token dq early_comma dq litstring, "exit", early_find, entry_to_execution_token, early_comma @@ -7737,6 +7736,7 @@ cold_start: dq lit, 0x80, early_comma dq litstring, "invert", early_find, entry_to_execution_token, early_comma dq litstring, "&", early_find, entry_to_execution_token, early_comma + dq litstring, "swap", early_find, entry_to_execution_token, early_comma dq litstring, "entry-flags!", early_find, entry_to_execution_token dq early_comma dq litstring, "exit", early_find, entry_to_execution_token, early_comma @@ -7750,6 +7750,7 @@ cold_start: dq litstring, "lit", early_find, entry_to_execution_token, early_comma dq lit, 0x01, early_comma dq litstring, "|", early_find, entry_to_execution_token, early_comma + dq litstring, "swap", early_find, entry_to_execution_token, early_comma dq litstring, "entry-flags!", early_find, entry_to_execution_token dq early_comma dq litstring, "exit", early_find, entry_to_execution_token, early_comma |