about summary refs log tree commit diff
path: root/compilation
diff options
context:
space:
mode:
authorIrene Knapp <ireneista@irenes.space>2026-10-04 21:42:42 -0700
committerIrene Knapp <ireneista@irenes.space>2026-10-04 21:42:42 -0700
commit0ce13955322d1622ab6e1ee2f78809198347fd17 (patch)
tree539bc6f4823814906501d23d677e25e5c5098af5 /compilation
parent03253e6516e7b2daccd46731e6f4cd72ca18ddfd (diff)
fix comment position in the boot-source dictionary entry header
Force-Push: yes
Change-Id: I94592083435e024d9a87122f4d5529cdb98f8e06
Diffstat (limited to 'compilation')
-rw-r--r--compilation/execution.e7
1 files changed, 4 insertions, 3 deletions
diff --git a/compilation/execution.e b/compilation/execution.e
index 01f3b68..b12cfc6 100644
--- a/compilation/execution.e
+++ b/compilation/execution.e
@@ -706,10 +706,11 @@
   ~ : valiantly attempted.
   ~ : blank-line
   ~ : indent
-  3unroll pack64 ~ : 8 #-- (previous entry pointer)
+  3unroll pack64 ~ : -8 #-- (previous entry pointer)
   ~ : 1 #-- (entry flags)
   0x80 pack8
-  ~ : 2 bidirectional-null-terminated entry name
+  ~ : bidirectional-null-terminated entry name
+  ~ : 2 adjust-length
   0 pack8
   ~ (output buffer start, input string pointer, output point)
 
@@ -718,7 +719,7 @@
   ~ string's length and use it for an appropriate adjustment.
   dup stringlen
   ~ : provide-data
-  ~ : data-adjust-length
+  ~ : 1 data-adjust-length
   drop
   ~ : 2 suppress
   packstring