mirror of
https://github.com/cc65/cc65.git
synced 2024-09-23 19:47:37 +00:00
Fixed a bug: Closing all files on exit did not work
git-svn-id: svn://svn.cc65.org/cc65/trunk@3175 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
parent
7c1590b5d5
commit
5681334d52
@ -30,8 +30,8 @@
|
|||||||
|
|
||||||
.proc closeallfiles
|
.proc closeallfiles
|
||||||
|
|
||||||
ldx #MAX_FDS
|
ldx #MAX_FDS-1
|
||||||
loop: lda fdtab-1,x
|
loop: lda fdtab,x
|
||||||
beq next ; Skip unused entries
|
beq next ; Skip unused entries
|
||||||
|
|
||||||
; Close this file
|
; Close this file
|
||||||
@ -46,7 +46,7 @@ loop: lda fdtab-1,x
|
|||||||
; Next file
|
; Next file
|
||||||
|
|
||||||
next: dex
|
next: dex
|
||||||
bne loop
|
bpl loop
|
||||||
|
|
||||||
rts
|
rts
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user