1 files changed, 14 insertions, 0 deletions
diff --git a/transform.e b/transform.e
index 45d52dc..c9b06af 100644
--- a/transform.e
+++ b/transform.e
@@ -2382,10 +2382,14 @@ allocate-transformation-state s" transformation-state" variable
   1 transform-apply-stack-delta
 
   log-load-unroll-log-address
+  ~ : {
+  ~ : indent
   ; make-immediate
 
 
 : log-load-right-curly-brace-alternate
+  ~ : deindent
+  ~ : }
   log-load-roll-log-address
 
   swap-transform-variables
@@ -2404,6 +2408,7 @@ allocate-transformation-state s" transformation-state" variable
 
 ~ (start pointer, length --)
 : log-load-if-alternate
+  ~ : if
   log-load-roll-log-address
 
   swap-transform-variables
@@ -2417,11 +2422,13 @@ allocate-transformation-state s" transformation-state" variable
   -2 transform-apply-stack-delta
 
   log-load-unroll-log-address
+  ~ : blank-line
   ; make-immediate
 
 
 ~ (start pointer, length)
 : log-load-unless-alternate
+  ~ : unless
   log-load-roll-log-address
 
   swap-transform-variables
@@ -2435,11 +2442,13 @@ allocate-transformation-state s" transformation-state" variable
   -2 transform-apply-stack-delta
 
   log-load-unroll-log-address
+  ~ : blank-line
   ; make-immediate
 
 
 ~ (true start, true length, false start, false length)
 : log-load-if-else-alternate
+  ~ : if-else
   log-load-roll-log-address
 
   swap-transform-variables
@@ -2453,11 +2462,13 @@ allocate-transformation-state s" transformation-state" variable
   -4 transform-apply-stack-delta
 
   log-load-unroll-log-address
+  ~ : blank-line
   ; make-immediate
 
 
 ~ (start, length --)
 : log-load-forever-alternate
+  ~ : forever
   log-load-roll-log-address
 
   swap-transform-variables
@@ -2471,11 +2482,13 @@ allocate-transformation-state s" transformation-state" variable
   -2 transform-apply-stack-delta
 
   log-load-unroll-log-address
+  ~ : blank-line
   ; make-immediate
 
 
 ~ (test start, test length, body start, body length --)
 : log-load-while-alternate
+  ~ : while
   log-load-roll-log-address
 
   swap-transform-variables
@@ -2489,6 +2502,7 @@ allocate-transformation-state s" transformation-state" variable
   -4 transform-apply-stack-delta
 
   log-load-unroll-log-address
+  ~ : blank-line
   ; make-immediate