Fix a kernal problem

git-svn-id: svn://svn.cc65.org/cc65/trunk@2810 b7a2c559-68d2-44c3-8de9-860c34a00d81

libsrc/c16/Makefile

@@ -40,6 +40,7 @@ OBJS =	_scrsize.o   	\
         get_tv.o        \
 	joy_stddrv.o	\
 	kbhit.o	     	\
+        kclose.o        \
         kernal.o        \
         mainargs.o      \
         randomize.o     \

libsrc/c16/kclose.s

@@ -0,0 +1,14 @@
+;
+; Ullrich von Bassewitz, 2003-12-21
+;
+; CLOSE replacement function
+;
+
+        .export         CLOSE
+
+.proc   CLOSE
+ 	clc				; Force C64 compatible behaviour
+        jmp	$FFC3                   ; Call the ROM routine
+.endproc
+
+

libsrc/c16/kernal.s

@@ -26,7 +26,6 @@
         .export         SETLFS
         .export         SETNAM
         .export         OPEN
-        .export         CLOSE
         .export         CHKIN
         .export         CKOUT
         .export         CLRCH
@@ -70,7 +69,7 @@ READST		= $FFB7
 SETLFS		= $FFBA
 SETNAM		= $FFBD
 OPEN		= $FFC0
-CLOSE		= $FFC3
+;CLOSE		= $FFC3
 CHKIN		= $FFC6
 CKOUT		= $FFC9
 CLRCH		= $FFCC