diff options
-rw-r--r-- | subx/apps/pack.subx | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/subx/apps/pack.subx b/subx/apps/pack.subx index a27d2613..cf0a27d7 100644 --- a/subx/apps/pack.subx +++ b/subx/apps/pack.subx @@ -200,10 +200,10 @@ $convert:end: convert-instruction: # line : (address stream byte), out : (address buffered-file) -> <void> # pseudocode: # word-slice = next-word - # if (*word-slice->start == '#') + # if (slice-starts-with?(word-slice, '#')) # write-stream-buffered(out, line) # return - # if (starts-with(word-slice, '==')) + # if (slice-starts-with?(word-slice, '==')) # write-stream-buffered(out, line) # return # |