add a special word for magic-comment tab stops

Force-Push: yes
Change-Id: I7ba182f5939aa3b5d280fb48673e2cc74d72e8ea

1 files changed, 20 insertions, 20 deletions

diff --git a/execution.e b/execution.e
index 3800e16..536bcbf 100644
--- a/execution.e
+++ b/execution.e
@@ -508,44 +508,44 @@
   ~ within itself.
 
   L@' log-load-log offset-to-target-address-space pack64
-  ~ : -8 log-load-log    (codeword pointer)
+  ~ : -8 log-load-log #-- (codeword pointer)
   L@' litstring offset-to-target-address-space pack64
-  ~ : -8 litstring    (codeword pointer)
+  ~ : -8 litstring #-- (codeword pointer)
   s" log" packstring 8 packalign
   L@' log-load-variable offset-to-target-address-space pack64
-  ~ : -8 log-load-variable    (codeword pointer)
+  ~ : -8 log-load-variable #-- (codeword pointer)
 
   L@' log-load-s0 offset-to-target-address-space pack64
-  ~ : -8 log-load-s0    (codeword pointer)
+  ~ : -8 log-load-s0 #-- (codeword pointer)
   L@' litstring offset-to-target-address-space pack64
-  ~ : -8 litstring    (codeword pointer)
+  ~ : -8 litstring #-- (codeword pointer)
   s" s0" packstring 8 packalign
   L@' log-load-variable offset-to-target-address-space pack64
-  ~ : -8 log-load-variable    (codeword pointer)
+  ~ : -8 log-load-variable #-- (codeword pointer)
 
   L@' log-load-r0 offset-to-target-address-space pack64
-  ~ : -8 log-load-r0    (codeword pointer)
+  ~ : -8 log-load-r0 #-- (codeword pointer)
   L@' litstring offset-to-target-address-space pack64
-  ~ : -8 litstring    (codeword pointer)
+  ~ : -8 litstring #-- (codeword pointer)
   s" r0" packstring 8 packalign
   L@' log-load-variable offset-to-target-address-space pack64
-  ~ : -8 log-load-variable    (codeword pointer)
+  ~ : -8 log-load-variable #-- (codeword pointer)
 
   L@' log-load-latest offset-to-target-address-space pack64
-  ~ : -8 log-load-latest    (codeword pointer)
+  ~ : -8 log-load-latest #-- (codeword pointer)
   L@' litstring offset-to-target-address-space pack64
-  ~ : -8 litstring    (codeword pointer)
+  ~ : -8 litstring #-- (codeword pointer)
   s" latest" packstring 8 packalign
   L@' log-load-variable offset-to-target-address-space pack64
-  ~ : -8 log-load-variable    (codeword pointer)
+  ~ : -8 log-load-variable #-- (codeword pointer)
 
   L@' log-load-here offset-to-target-address-space pack64
-  ~ : -8 log-load-here    (codeword pointer)
+  ~ : -8 log-load-here #-- (codeword pointer)
   L@' litstring offset-to-target-address-space pack64
-  ~ : -8 litstring    (codeword pointer)
+  ~ : -8 litstring #-- (codeword pointer)
   s" here" packstring 8 packalign
   L@' log-load-variable offset-to-target-address-space pack64
-  ~ : -8 log-load-variable    (codeword pointer)
+  ~ : -8 log-load-variable #-- (codeword pointer)
 
   ~   Having done that, nothing else needs to be defined in an unusual way, so
   ~ we can go ahead and dispatch to the log-load transform, and do the rest of
@@ -568,17 +568,17 @@
 
   ~ The next layer is built now, so let's move on to it.
   L@' litstring offset-to-target-address-space pack64
-  ~ : -8 litstring    (codeword pointer)
+  ~ : -8 litstring #-- (codeword pointer)
   s" quit" packstring 8 packalign
   L@' log-load-find-execution-token offset-to-target-address-space pack64
-  ~ : -8 log-load-find-execution-token    (codeword pointer)
+  ~ : -8 log-load-find-execution-token #-- (codeword pointer)
   L@' swap offset-to-target-address-space pack64
-  ~ : -8 swap    (codewored pointer)
+  ~ : -8 swap #-- (codewored pointer)
   ~ : Get rid of that heap pointer on the stack, we're finally done with it!
   L@' drop offset-to-target-address-space pack64
-  ~ : -8 drop    (codeword pointer)
+  ~ : -8 drop #-- (codeword pointer)
   L@' execute offset-to-target-address-space pack64
-  ~ : -8 execute    (codeword pointer)
+  ~ : -8 execute #-- (codeword pointer)
   ~ : deindent
   ;