the10thwiz/cc65
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Use structs

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@2707 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz
2003-12-03 10:15:33 +00:00
parent 92a001d3af
commit c15fd58d3b
15 changed files with 64 additions and 60 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
libsrc/common/fclose.s
View File

@@ -8,7 +8,7 @@
.export _fclose
.import _close
.importzp ptr1
.importzp ptr1
.include "errno.inc"
.include "_file.inc"
@@ -23,7 +23,7 @@
; Check if the file is really open
ldy #_FILE_f_flags
ldy #_FILE::f_flags
lda (ptr1),y
and #_FOPEN
bne @L1
@@ -43,7 +43,7 @@
@L1: lda #_FCLOSED
sta (ptr1),y
ldy #_FILE_f_fd
ldy #_FILE::f_fd
lda (ptr1),y
ldx #0
jmp _close ; Will set errno and return an error flag