This commit is contained in:
Koichi Nakamura 2020-12-31 07:50:02 +09:00
parent d8479aaddf
commit 8e026766ce

11
core.fs
View file

@ -190,12 +190,9 @@ c~ i,
'e,
l!
\ 'B' ( c -- ) C-COMMA
\ Store byte 'c' to here and increment it
cB i, 'h, '@, '$, 'h, 'L, k1k0-, '+, 'h, '!, 'e, l!
kA kB ~ t t \ AB
k
t
kA kB o t t t
k
t
kA kB B t
Q