From f7ef63a0355d976dc3d7c5823da5b416243a8349 Mon Sep 17 00:00:00 2001
From: Irene Knapp <ireneista@irenes.space>
Date: Sat, 19 Sep 2026 18:11:24 -0700
Subject: every byte in the hex output is now attributed

wow!!!!

Force-Push: yes
Change-Id: I2b46837b5ff37b4339a9a4ba0ae52903854d5e99
---
 transform.e | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

(limited to 'transform.e')

diff --git a/transform.e b/transform.e
index c9b06af..ee4f113 100644
--- a/transform.e
+++ b/transform.e
@@ -1541,7 +1541,6 @@ allocate-transformation-state s" transformation-state" variable
   ~ :   The warm-start routine relies on words defined by the label transform,
   ~ : as does the log-load routine.
   ~ : blank-line
-  ~ : blank-line
 
   main-input-buffer dup push-input-buffer
   3roll attach-string-to-input-buffer
@@ -2295,7 +2294,7 @@ allocate-transformation-state s" transformation-state" variable
     swap-transform-variables
 
     offset-to-target-address-space ,
-    ~ : -8 log-load-comma    (codeword pointer)
+    ~ : -8 log-load-find    (codeword pointer)
 
     ~   We leave an execution token on the log-load-time stack, so no delta
     ~ needed.
@@ -2620,7 +2619,9 @@ allocate-transformation-state s" transformation-state" variable
     ~   This is an immediate effect, so once we've done it, we update the user
     ~ stack depth. An integer literal is a stack-depth delta of 1.
     swap-transform-variables L@' lit swap-transform-variables
-    offset-to-target-address-space , ,
+    offset-to-target-address-space ,   ~ : -8 lit    (codeword pointer)
+                                       ~ : provide-hex
+    ,                                  ~ : -8 #    (integer literal)
     1 transform-apply-stack-delta
     0 exit
   } if
@@ -2674,6 +2675,7 @@ allocate-transformation-state s" transformation-state" variable
   {
     ~   Again just like in label-transform, we declare our use of the label
     ~ and get a value for it.
+    ~ : provide-string-copy
     swap-transform-variables
     intern-label use-label
     swap-transform-variables
@@ -2687,6 +2689,7 @@ allocate-transformation-state s" transformation-state" variable
     ~   This is an immediate effect, so once we've done that, we update the
     ~ user stack depth.
     offset-to-target-address-space ,
+    ~ : -8 #    (codeword pointer)
     transform-apply-stack-delta
     dropstring 0 exit
   } if
-- 
cgit 1.4.1