diff options
Diffstat (limited to 'transform.e')
| -rw-r--r-- | transform.e | 16 |
1 files changed, 11 insertions, 5 deletions
diff --git a/transform.e b/transform.e index 12c5483..7560752 100644 --- a/transform.e +++ b/transform.e @@ -3094,7 +3094,7 @@ allocate-transformation-state s" transformation-state" variable : hex-sys-write-replacement postprocess-metadata-entries - { over } { + { over 0 <= } { transformation-state transformation-state-output-metadata @ hex-output-metadata-first-entry ~ (length remaining, current output address, metadata scan pointer) @@ -3193,10 +3193,16 @@ allocate-transformation-state s" transformation-state" variable } while drop - is-fresh-line@ { indentation-depth@ dup indent advance-current-column } if - dup 8@ .hex8 space - 3 advance-current-column - 0 is-fresh-line! + over { + is-fresh-line@ { + indentation-depth@ dup indent advance-current-column + } if + + dup 8@ .hex8 space + + 3 advance-current-column + 0 is-fresh-line! + } if 1+ swap 1- swap } while ; |