zuse: fix off-by-one in +wail:klr:format

This commit is contained in:
fang 2021-04-21 00:50:11 +02:00
parent d1fba5d740
commit ba3a62f958
No known key found for this signature in database
GPG Key ID: EB035760C1BBA972
2 changed files with 3 additions and 3 deletions

View File

@ -1,3 +1,3 @@
version https://git-lfs.github.com/spec/v1
oid sha256:2800e4ff87369d6206daa96937d8a186a12da67aac2ab8cd74c6c359f26cddb8
size 3952579
oid sha256:a1d3154858e1eaa9ab48dfe3ff24cfe1994e7e96379d1fd9cd971df4939ce220
size 3952575

View File

@ -3791,7 +3791,7 @@
(scag b a)
::
=+ e=(lent-char a)
?: (lth b e) ~
?: (lte b e) ~
[*stye (reap (sub b e) d)]~
::
c