Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-07-07 04:28:56 +00:00
Code Issues Projects Releases Wiki Activity

Fix a bug in batch mode (crash when empty line in file)

Browse Source
This commit is contained in:
Rémy GIBERT 2016-01-06 23:06:41 +01:00
parent 4acc9d08a6
commit ab46cb81e6
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
SBIN/SHELL.S.txt
View File

@ -414,6 +414,9 @@ ReadTxtFile >PUSHWI 127
>SYSCALL SYS.MLIRead
bcs .9
tya
beq .10
lda TmpBuffer256,y Y,A=Bytes read
cmp #$0D
bne .10
@ -422,13 +425,14 @@ ReadTxtFile >PUSHWI 127
.10 tya
sta (pData)
beq .2
.1 lda TmpBuffer256,y
sta (pData),y
dey
bne .1
lda #'>'
.2 lda #'>'
>SYSCALL SYS.COutA
lda #'"'
>SYSCALL SYS.COutA