errno/oserrno stuff is cleaned up, saved some bytes in dialog box functions
git-svn-id: svn://svn.cc65.org/cc65/trunk@775 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
@@ -6,6 +6,7 @@
|
||||
|
||||
; char AppendRecord (void);
|
||||
|
||||
.import __oserror
|
||||
.export _AppendRecord
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -14,6 +15,6 @@
|
||||
_AppendRecord:
|
||||
|
||||
jsr AppendRecord
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -6,6 +6,7 @@
|
||||
|
||||
; char CloseRecordFile (void);
|
||||
|
||||
.import __oserror
|
||||
.export _CloseRecordFile
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -13,6 +14,6 @@
|
||||
|
||||
_CloseRecordFile:
|
||||
jsr CloseRecordFile
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -6,6 +6,7 @@
|
||||
|
||||
; char DeleteFile (char *myName);
|
||||
|
||||
.import __oserror
|
||||
.export _DeleteFile
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -15,6 +16,6 @@ _DeleteFile:
|
||||
sta r0L
|
||||
stx r0H
|
||||
jsr DeleteFile
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -6,6 +6,7 @@
|
||||
|
||||
; char DeleteRecord (void);
|
||||
|
||||
.import __oserror
|
||||
.export _DeleteRecord
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -13,6 +14,6 @@
|
||||
|
||||
_DeleteRecord:
|
||||
jsr DeleteRecord
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -6,6 +6,7 @@
|
||||
|
||||
; char FindFile (char *myName);
|
||||
|
||||
.import __oserror
|
||||
.export _FindFile
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -15,6 +16,6 @@ _FindFile:
|
||||
sta r6L
|
||||
stx r6H
|
||||
jsr FindFile
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -7,7 +7,7 @@
|
||||
; char FindFTypes (char *buffer, char fileType, char fileMax, char *Class);
|
||||
|
||||
.export _FindFTypes
|
||||
.import popax, popa
|
||||
.import popax, popa, __oserror
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
.include "../inc/geossym.inc"
|
||||
@@ -24,7 +24,7 @@ _FindFTypes:
|
||||
sta r6L
|
||||
stx r6H
|
||||
jsr FindFTypes
|
||||
stx errno
|
||||
stx __oserror
|
||||
; return (fileMax - r7H)
|
||||
lda tmpFileMax
|
||||
sec
|
||||
|
||||
@@ -7,7 +7,7 @@
|
||||
; char FollowChain (struct tr_se *myTrSe, char *buffer);
|
||||
|
||||
.export _FollowChain
|
||||
.import popax
|
||||
.import popax, __oserror
|
||||
.import gettrse
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -21,6 +21,6 @@ _FollowChain:
|
||||
sta r1L
|
||||
stx r1H
|
||||
jsr FollowChain
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -6,6 +6,7 @@
|
||||
|
||||
; char FreeFile (struct trse myTrSe[]);
|
||||
|
||||
.import __oserror
|
||||
.export _FreeFile
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -15,6 +16,6 @@ _FreeFile:
|
||||
sta r9L
|
||||
stx r9H
|
||||
jsr FreeFile
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -6,6 +6,7 @@
|
||||
|
||||
; struct filehandle* Get1stDirEntry (void);
|
||||
|
||||
.import __oserror
|
||||
.export _Get1stDirEntry
|
||||
|
||||
.include "../inc/diskdrv.inc"
|
||||
@@ -13,7 +14,7 @@
|
||||
|
||||
_Get1stDirEntry:
|
||||
jsr Get1stDirEntry
|
||||
stx errno
|
||||
stx __oserror
|
||||
lda r5L
|
||||
ldx r5H
|
||||
rts
|
||||
|
||||
@@ -6,6 +6,7 @@
|
||||
|
||||
; char GetFHdrInfo (struct filehandle *myFile);
|
||||
|
||||
.import __oserror
|
||||
.export _GetFHdrInfo
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -15,6 +16,6 @@ _GetFHdrInfo:
|
||||
sta r9L
|
||||
stx r9H
|
||||
jsr GetFHdrInfo
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -6,6 +6,7 @@
|
||||
|
||||
; struct filehandle* GetNxtDirEntry (void);
|
||||
|
||||
.import __oserror
|
||||
.export _GetNxtDirEntry
|
||||
|
||||
.include "../inc/diskdrv.inc"
|
||||
@@ -13,7 +14,7 @@
|
||||
|
||||
_GetNxtDirEntry:
|
||||
jsr GetNxtDirEntry
|
||||
stx errno
|
||||
stx __oserror
|
||||
lda r5L
|
||||
ldx r5H
|
||||
rts
|
||||
|
||||
@@ -6,6 +6,7 @@
|
||||
|
||||
; char InsertRecord (void);
|
||||
|
||||
.import __oserror
|
||||
.export _InsertRecord
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -13,6 +14,6 @@
|
||||
|
||||
_InsertRecord:
|
||||
jsr InsertRecord
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -6,6 +6,7 @@
|
||||
|
||||
; char NextRecord (void);
|
||||
|
||||
.import __oserror
|
||||
.export _NextRecord
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -13,6 +14,6 @@
|
||||
|
||||
_NextRecord:
|
||||
jsr NextRecord
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -6,6 +6,7 @@
|
||||
|
||||
; char OpenRecordFile (char *myName);
|
||||
|
||||
.import __oserror
|
||||
.export _OpenRecordFile
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -15,6 +16,6 @@ _OpenRecordFile:
|
||||
sta r0L
|
||||
stx r0H
|
||||
jsr OpenRecordFile
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -6,6 +6,7 @@
|
||||
|
||||
; char PointRecord (char recordNum);
|
||||
|
||||
.import __oserror
|
||||
.export _PointRecord
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -13,6 +14,6 @@
|
||||
|
||||
_PointRecord:
|
||||
jsr PointRecord
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -6,6 +6,7 @@
|
||||
|
||||
; char PreviousRecord (void);
|
||||
|
||||
.import __oserror
|
||||
.export _PreviousRecord
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -13,6 +14,6 @@
|
||||
|
||||
_PreviousRecord:
|
||||
jsr PreviousRecord
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -6,6 +6,7 @@
|
||||
|
||||
; char ReadByte (void);
|
||||
|
||||
.import __oserror
|
||||
.export _ReadByte
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -13,5 +14,5 @@
|
||||
|
||||
_ReadByte:
|
||||
jsr ReadByte
|
||||
stx errno
|
||||
stx __oserror
|
||||
rts
|
||||
|
||||
@@ -7,7 +7,7 @@
|
||||
; char ReadFile (struct tr_se *myTS, char *buffer, int length);
|
||||
|
||||
.export _ReadFile
|
||||
.import popax
|
||||
.import popax, __oserror
|
||||
.import gettrse
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -24,6 +24,6 @@ _ReadFile:
|
||||
sta r1L
|
||||
stx r1H
|
||||
jsr ReadFile
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -7,7 +7,7 @@
|
||||
; char ReadRecord (char *buffer, int length);
|
||||
|
||||
.export _ReadRecord
|
||||
.import popax
|
||||
.import popax, __oserror
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
.include "../inc/geossym.inc"
|
||||
@@ -19,6 +19,6 @@ _ReadRecord:
|
||||
sta r7L
|
||||
stx r7H
|
||||
jsr ReadRecord
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -7,7 +7,7 @@
|
||||
; char RenameFile (char *source, char *target);
|
||||
|
||||
.export _RenameFile
|
||||
.import popax
|
||||
.import popax, __oserror
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
.include "../inc/geossym.inc"
|
||||
@@ -19,6 +19,6 @@ _RenameFile:
|
||||
sta r6L
|
||||
stx r6H
|
||||
jsr RenameFile
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -6,6 +6,7 @@
|
||||
|
||||
; char SaveFile (struct fileheader *myHeader);
|
||||
|
||||
.import __oserror
|
||||
.export _SaveFile
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -15,6 +16,6 @@ _SaveFile:
|
||||
sta r9L
|
||||
stx r9H
|
||||
jsr SaveFile
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -6,6 +6,7 @@
|
||||
|
||||
; char UpdateRecordFile (void);
|
||||
|
||||
.import __oserror
|
||||
.export _UpdateRecordFile
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
@@ -13,6 +14,6 @@
|
||||
|
||||
_UpdateRecordFile:
|
||||
jsr UpdateRecordFile
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
@@ -7,7 +7,7 @@
|
||||
; char WriteRecord (char *buffer, int length);
|
||||
|
||||
.export _WriteRecord
|
||||
.import popax
|
||||
.import popax, __oserror
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
.include "../inc/geossym.inc"
|
||||
@@ -19,6 +19,6 @@ _WriteRecord:
|
||||
sta r7L
|
||||
stx r7H
|
||||
jsr WriteRecord
|
||||
stx errno
|
||||
stx __oserror
|
||||
txa
|
||||
rts
|
||||
|
||||
Reference in New Issue
Block a user