mirror of
https://github.com/cc65/cc65.git
synced 2024-12-25 02:29:52 +00:00
dada43f570
git-svn-id: svn://svn.cc65.org/cc65/trunk@2846 b7a2c559-68d2-44c3-8de9-860c34a00d81
22 lines
399 B
ArmAsm
22 lines
399 B
ArmAsm
;
|
|
; Ullrich von Bassewitz, 2003-12-21
|
|
;
|
|
; CLOSE kernal call.
|
|
;
|
|
; NOTE: The CLOSE system call in the CBM610 kernal will only remove the file
|
|
; entry and not close the file on IEC if the carry is clear on entry. To make
|
|
; this somewhat compatible with the C64, set the carry before jumping to the
|
|
; kernal.
|
|
|
|
.export CLOSE
|
|
|
|
.proc CLOSE
|
|
|
|
sec
|
|
jmp $FFC3
|
|
|
|
.endproc
|
|
|
|
|
|
|