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:
izydorst
2001-07-04 22:08:13 +00:00
parent fc51f7f77f
commit ebce3ebbc3
54 changed files with 105 additions and 110 deletions

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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