diff options
| author | Irene Knapp <ireneista@irenes.space> | 2026-05-21 16:52:41 -0700 |
|---|---|---|
| committer | Irene Knapp <ireneista@irenes.space> | 2026-05-21 16:52:41 -0700 |
| commit | a7a670e41bdaf9c57bfe7bbd802158de91d7d94d (patch) | |
| tree | 14d17e45d658503e20cd50a8c6bb7d02a39f4603 /output.e | |
| parent | 09e1758b4380767647a238f88f51baa85e6e4df5 (diff) | |
started cleaning up all the log-loaded functionality
it's in dynamic.e for now Force-Push: yes Change-Id: I4d0c5917eccd58cb881850faee0728d786010c27
Diffstat (limited to 'output.e')
| -rw-r--r-- | output.e | 49 |
1 files changed, 25 insertions, 24 deletions
diff --git a/output.e b/output.e index fe777b8..80f1577 100644 --- a/output.e +++ b/output.e @@ -191,28 +191,29 @@ ~ Debugging tools ~ ~~~~~~~~~~~~~~~ -~ ~ TODO this is a horrible, horrible hack -: s0-kludge 0x1000010008 ; - -~ TODO replace these with the implementations that use proper flow-control -: stack - s0-kludge @ 8 - - - dup value@ 8 + != - 0branch [ 19 8 * , ] - dup s0-kludge @ 8 - != 0branch [ 2 8 * , ] space dup @ . 8 - - branch [ -25 8 * , ] - - drop newline ; - - -: stackhex - s0-kludge @ 8 - - - dup value@ 8 + != - 0branch [ 19 8 * , ] - dup s0-kludge @ 8 - != 0branch [ 2 8 * , ] space dup @ .hex64 8 - - branch [ -25 8 * , ] - - drop newline ; +~ TODO remove these altogether, they're in dynamic.e now +~ ~ ~ TODO this is a horrible, horrible hack +~ : s0-kludge 0x1000010008 ; +~ +~ ~ TODO replace these with the implementations that use proper flow-control +~ : stack +~ s0-kludge @ 8 - +~ +~ dup value@ 8 + != +~ 0branch [ 19 8 * , ] +~ dup s0-kludge @ 8 - != 0branch [ 2 8 * , ] space dup @ . 8 - +~ branch [ -25 8 * , ] +~ +~ drop newline ; +~ +~ +~ : stackhex +~ s0-kludge @ 8 - +~ +~ dup value@ 8 + != +~ 0branch [ 19 8 * , ] +~ dup s0-kludge @ 8 - != 0branch [ 2 8 * , ] space dup @ .hex64 8 - +~ branch [ -25 8 * , ] +~ +~ drop newline ; |