diff options
Diffstat (limited to 'execution.e')
| -rw-r--r-- | execution.e | 16 |
1 files changed, 11 insertions, 5 deletions
diff --git a/execution.e b/execution.e index ce4c2c4..0aa5491 100644 --- a/execution.e +++ b/execution.e @@ -483,11 +483,17 @@ ~ Now everything we need has been added to the log and we're almost ready ~ to jump into it. It's inconvenient for code under the log-load transform - ~ to interact with the label system, so we initialize main-input-buffer - ~ here. - ~ - ~ TODO or not ;) - ~ main-input-buffer boot-source attach-string-to-input-buffer + ~ to interact with the label system, so if we want to point + ~ main-input-buffer at a string, this is the place to do it. + + ~ The next layer is built now, so let's move on to it. + L@' litstring offset-to-target-address-space pack64 + s" quit" packstring 8 packalign + L@' log-load-find-execution-token offset-to-target-address-space pack64 + L@' swap offset-to-target-address-space pack64 + ~ Get rid of that heap pointer on the stack, we're finally done with it! + L@' drop offset-to-target-address-space pack64 + L@' execute offset-to-target-address-space pack64 ; |