some fixes
git-svn-id: svn://svn.cc65.org/cc65/trunk@4829 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
@@ -90,8 +90,8 @@ cioerr: sty __oserror
|
|||||||
rts
|
rts
|
||||||
|
|
||||||
copychar: lda (ptr1),y ; src=y dest=tmp1
|
copychar: lda (ptr1),y ; src=y dest=tmp1
|
||||||
cmp #' '
|
|
||||||
ldy tmp1
|
ldy tmp1
|
||||||
|
cmp #' '
|
||||||
beq @break
|
beq @break
|
||||||
sta (ptr1),y
|
sta (ptr1),y
|
||||||
iny
|
iny
|
||||||
@@ -105,6 +105,9 @@ copychar: lda (ptr1),y ; src=y dest=tmp1
|
|||||||
sta ICCOM,x
|
sta ICCOM,x
|
||||||
jsr CIOV
|
jsr CIOV
|
||||||
bmi @cioerr
|
bmi @cioerr
|
||||||
|
ldx #0
|
||||||
|
stx __oserror ; clear system specific error code
|
||||||
|
txa
|
||||||
rts
|
rts
|
||||||
@cioerr: jmp __do_oserror
|
@cioerr: jmp __do_oserror
|
||||||
.endproc
|
.endproc
|
||||||
|
|||||||
Reference in New Issue
Block a user