Renamed var

This commit is contained in:
Devine Lu Linvega 2023-05-24 10:06:34 -07:00
parent 57ae0709eb
commit 6b7842b0db
1 changed files with 3 additions and 3 deletions

View File

@ -35,11 +35,11 @@ BRK
(
@|core )
@append ( c -- )
,&chr STR
@append ( byte -- )
,&buf STR
#0800
&l
[ LIT &chr $1 ] OVR #07 SWP SUB SFT #01 AND
[ LIT &buf $1 ] OVR #07 SWP SUB SFT #01 AND
[ LIT &inc $1 ] INCk #06 DIVk MUL SUB ,&inc STR
( bit id -- )
SWP .queue LDZ ORA DUP ADD .queue STZ