Run through at least one char

This commit is contained in:
Devine Lu Linvega 2023-02-06 15:59:17 -08:00
parent 140529c35e
commit f198e5d8aa
1 changed files with 1 additions and 3 deletions

View File

@ -36,12 +36,10 @@ BRK
#2443 ,&a STR2 #118d ,&b STR2
&w
;&c .File/read DEO2
.File/success DEI2 #0000 EQU2 ?&end
[ LIT &c $1 ] DUP DUP2
[ LIT2 &x $2 ] [ LIT2 &a $2 ] MUL2 ADD2 ,&x STR2
[ LIT2 &y $2 ] [ LIT2 &b $2 ] MUL2 ADD2 ,&y STR2
!&w
&end
.File/success DEI2 ORA ?&w
,&x LDR2 ,&y LDR2
JMP2r