Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2025-02-16 18:30:26 +00:00
Code Issues Projects Releases Wiki Activity

Kernel 0.92

Browse Source
This commit is contained in:
Rémy GIBERT 2018-11-29 21:47:28 +01:00
parent 693da619ee
commit f6b67a093f
2 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.Floppies/A2OSX.BUILD.po
View File

Binary file not shown.

16
BIN/SHELL.S.CL.txt
View File

@ -267,7 +267,7 @@ CL.GetLine >LDYA ZPFileBufPtr
lda (ZPFileBufPtr)
beq .9
>STZ.G CL.bInQuote
ldx #0 not in "
ldy #0
@ -280,20 +280,20 @@ CL.GetLine >LDYA ZPFileBufPtr
cmp #'"'
bne .2
phy
>EOR.G CL.bInQuote
sta (pData),y
ply
txa
eor #$80 toggle " switch
tax
lda #'"'
bra .5
.2 cmp #';'
bne .5
phy
>LDA.G CL.bInQuote
txa
beq .6
ply
lda #';'
.5 sta (ZPCLBuf),y
iny