diff options
| author | Irene Knapp <ireneista@irenes.space> | 2026-09-19 18:11:24 -0700 |
|---|---|---|
| committer | Irene Knapp <ireneista@irenes.space> | 2026-09-19 18:11:24 -0700 |
| commit | f7ef63a0355d976dc3d7c5823da5b416243a8349 (patch) | |
| tree | 46dfaae1d5c21f54f1fc07c284a734a5067f58d9 /execution-support.e | |
| parent | d8a9f90d1734d76a1bacf6002760a8cbdf6e5a57 (diff) | |
every byte in the hex output is now attributed
wow!!!! Force-Push: yes Change-Id: I2b46837b5ff37b4339a9a4ba0ae52903854d5e99
Diffstat (limited to 'execution-support.e')
| -rw-r--r-- | execution-support.e | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/execution-support.e b/execution-support.e index 05dfe6d..a3d0ca5 100644 --- a/execution-support.e +++ b/execution-support.e @@ -36,6 +36,7 @@ ~ ~ (output point -- output point) : pack-next + ~ : "next" macro ~ Copy the next word's address from *rsi into rax. Increment rsi (as per ~ the DF flag). lods64 @@ -66,6 +67,7 @@ ~ ~ (output point, target address -- output point) : pack-beforenext + ~ : "beforenext" macro ~ Do a permanent transfer of control by setting rax and invoking the ~ codeword. Of course, we could jump to docol ourselves but this will work ~ regardless of what the receiving codeword is. @@ -97,11 +99,13 @@ ~ ~ (output point, source register -- output point) : pack-pushcontrol + ~ : "pushcontrol" macro swap :rbp -8 :rbp lea-reg64-disp8-reg64 swap :rbp 0 mov-disp8-reg64-reg64 ; ~ (output point, target register -- output point) : pack-popcontrol + ~ : "popcontrol" macro :rbp 0 3roll mov-reg64-disp8-reg64 :rbp 8 :rbp lea-reg64-disp8-reg64 ; |