From: cuz <cuz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Mon, 9 Aug 2004 10:38:12 +0000 (+0000)
Subject: Fixed a bug: Closing all files on exit did not work
X-Git-Tag: V2.12.0~659
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=5681334d52898037f012790608d87b566340de2b;p=cc65

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
---

diff --git a/libsrc/cbm/open.s b/libsrc/cbm/open.s
index a08bb31aa..8e001131b 100644
--- a/libsrc/cbm/open.s
+++ b/libsrc/cbm/open.s
@@ -30,8 +30,8 @@
 
 .proc   closeallfiles
 
-        ldx     #MAX_FDS
-loop:   lda     fdtab-1,x
+        ldx     #MAX_FDS-1
+loop:   lda     fdtab,x
         beq     next            ; Skip unused entries
 
 ; Close this file
@@ -46,7 +46,7 @@ loop:   lda     fdtab-1,x
 ; Next file
 
 next:   dex
-        bne     loop
+        bpl     loop
 
         rts