mirror of
https://github.com/cc65/cc65.git
synced 2025-03-12 08:32:54 +00:00
use tmp4 instead of tmp2; tmp2 might now be used by ucase_fn()
git-svn-id: svn://svn.cc65.org/cc65/trunk@2666 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
parent
0e392b79bd
commit
178b188eac
@ -7,7 +7,7 @@
|
|||||||
.include "atari.inc"
|
.include "atari.inc"
|
||||||
.include "errno.inc"
|
.include "errno.inc"
|
||||||
.import findfreeiocb
|
.import findfreeiocb
|
||||||
.importzp tmp2
|
.importzp tmp4
|
||||||
.ifdef UCASE_FILENAME
|
.ifdef UCASE_FILENAME
|
||||||
.importzp tmp3
|
.importzp tmp3
|
||||||
.import addysp
|
.import addysp
|
||||||
@ -30,7 +30,7 @@
|
|||||||
lda #TMOF ; too many open files
|
lda #TMOF ; too many open files
|
||||||
rts
|
rts
|
||||||
|
|
||||||
iocbok: stx tmp2 ; remember IOCB index
|
iocbok: stx tmp4 ; remember IOCB index
|
||||||
pla
|
pla
|
||||||
tax
|
tax
|
||||||
pla ; get argument again
|
pla ; get argument again
|
||||||
@ -46,7 +46,7 @@ ucok1:
|
|||||||
|
|
||||||
.endif ; defined UCASE_FILENAME
|
.endif ; defined UCASE_FILENAME
|
||||||
|
|
||||||
ldy tmp2 ; IOCB index
|
ldy tmp4 ; IOCB index
|
||||||
sta ICBAL,y ; store pointer to filename
|
sta ICBAL,y ; store pointer to filename
|
||||||
txa
|
txa
|
||||||
sta ICBAH,y
|
sta ICBAH,y
|
||||||
|
Loading…
x
Reference in New Issue
Block a user