aboutsummaryrefslogtreecommitdiff
path: root/slof
diff options
context:
space:
mode:
Diffstat (limited to 'slof')
-rw-r--r--slof/engine.in2
1 files changed, 1 insertions, 1 deletions
diff --git a/slof/engine.in b/slof/engine.in
index 2cc9d26..d723bc2 100644
--- a/slof/engine.in
+++ b/slof/engine.in
@@ -266,7 +266,7 @@ col(SPACES 0 DO?DO(3) SPACE DOLOOP(-3))
// Text manipulation.
col(COUNT DUP CHAR+ SWAP C@)
-col(PACK DUP >R SWAP MOVE R>)
+col(PACK DUP >R 1+ SWAP DUP R@ C! MOVE R>)
col(UPC DUP LIT('a') LIT('z') BETWEEN 0BRANCH(3) LIT(0x20) - )
col(LCC DUP LIT('A') LIT('Z') BETWEEN 0BRANCH(3) LIT(0x20) + )