mirror of https://github.com/A2osX/A2osX.git
Kernel 0.92+
This commit is contained in:
parent
37758e47f0
commit
3c685a58a5
Binary file not shown.
|
@ -349,11 +349,11 @@ CMD.ECHO stz ZPPtr1 echo -N
|
|||
|
||||
cmp #'N'
|
||||
bne .99
|
||||
|
||||
|
||||
lda #$ff
|
||||
eor ZPPtr1
|
||||
sta ZPPtr1
|
||||
bra .4
|
||||
bra .4
|
||||
|
||||
.2 lda ZPPtr1+1
|
||||
beq .3
|
||||
|
@ -448,7 +448,6 @@ CMD.READ lda (ZPArgVBufPtr)
|
|||
>STA.G bReadMode
|
||||
|
||||
.7 jsr CORE.ArgV.Next
|
||||
lda (ZPArgVBufPtr)
|
||||
bne .1
|
||||
|
||||
>LDA.G bReadMode
|
||||
|
@ -664,10 +663,7 @@ CMD.IsSwitch lda (ZPArgVBufPtr)
|
|||
bcs .8
|
||||
eor #$20
|
||||
|
||||
.8 jsr CORE.ArgV.NextChar
|
||||
jsr CORE.ArgV.NextChar
|
||||
|
||||
clc
|
||||
.8 clc
|
||||
rts
|
||||
|
||||
.9 sec
|
||||
|
|
Loading…
Reference in New Issue