diff options
Diffstat (limited to 'forth')
| -rw-r--r-- | forth/printer.fs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/forth/printer.fs b/forth/printer.fs index 6152993..d035e94 100644 --- a/forth/printer.fs +++ b/forth/printer.fs @@ -28,7 +28,7 @@ require types.fs : str-append { buf-addr buf-str-len str-addr str-len } buf-str-len str-len + { new-len } - new-len str-base-size > if + new-len str-base-size >= if buf-str-len new-len xor buf-str-len > if buf-addr new-len round-up resize throw to buf-addr |