diff options
| author | Irene Knapp <ireneista@irenes.space> | 2026-05-04 20:40:13 -0700 |
|---|---|---|
| committer | Irene Knapp <ireneista@irenes.space> | 2026-05-04 20:40:13 -0700 |
| commit | 0adcab31ac9a3597c1e27806151c3858fb501b24 (patch) | |
| tree | d8988bc69f02dfd98959627a283bf9c893710c85 /make-hello.e | |
| parent | da8799b45b281bc34d2c04a2e117b9b395e3f490 (diff) | |
implement create-in which is used for independent dictionaries
also some important TODOs have been discovered Force-Push: yes Change-Id: I8efe7d0074700d6f5c78d4a591e5b590f57f47a9
Diffstat (limited to 'make-hello.e')
| -rw-r--r-- | make-hello.e | 23 |
1 files changed, 15 insertions, 8 deletions
diff --git a/make-hello.e b/make-hello.e index 55f62d6..797c228 100644 --- a/make-hello.e +++ b/make-hello.e @@ -4,18 +4,25 @@ : origin 0x08000000 ; -heap hexdump latest @ .hex space here @ .hex newline -latest @ @ word-heading latest @ @ hexdump -latest @ word-heading latest @ hexdump -: foo - latest @ word-heading latest @ hexdump +: init-labels + heap hexdump + latest @ dup word-heading hexdump ~ s" labels" create 8 allocate s" labels" variable + 0 s" labels" find entry-to-execution-token execute ! ; -foo -latest @ word-heading latest @ hexdump +init-labels +latest @ dup word-heading hexdump +labels @ .hex newline -s" labels" find .hex bye +: new-label + s" frobboz" labels create-in + ; +here @ +new-label +latest @ dup word-heading hexdump +labels @ .hex newline +hexdump ~ ~~ ~ ~~ ELF header |