This commit was generated by cvs2svn to compensate for changes in r2,

which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81
2000-05-28 13:40:48 +00:00
parent 579491e8a4
commit 53dd513176
847 changed files with 91345 additions and 0 deletions
--- a/libsrc/geos/file/Makefile
+++ b/libsrc/geos/file/Makefile
@@ -0,0 +1,21 @@
+#
+# Makefile for GEOS lib
+# for cc65
+# 
+
+%.o:	%.s
+	@echo $<
+	@$(AS) -o $@ $(AFLAGS) $<
+
+
+S_OBJS	= get1stdirentry.o getnxtdirentry.o\
+	  openrecordfile.o closerecordfile.o nextrecord.o previousrecord.o pointrecord.o\
+	  deleterecord.o insertrecord.o appendrecord.o readrecord.o writerecord.o\
+	  updaterecordfile.o\
+	  findfile.o followchain.o getfhdrinfo.o readfile.o savefile.o freefile.o\
+	  deletefile.o renamefile.o findftypes.o readbyte.o
+
+all: $(S_OBJS)
+
+clean:
+	@rm -f *.~ $(S_OBJS) core
--- a/libsrc/geos/file/appendrecord.s
+++ b/libsrc/geos/file/appendrecord.s
@@ -0,0 +1,19 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char AppendRecord  (void);
+
+	    .export _AppendRecord
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_AppendRecord:
+
+	jsr AppendRecord
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/closerecordfile.s
+++ b/libsrc/geos/file/closerecordfile.s
@@ -0,0 +1,18 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char CloseRecordFile  (void);
+
+	    .export _CloseRecordFile
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_CloseRecordFile:
+	jsr CloseRecordFile
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/deletefile.s
+++ b/libsrc/geos/file/deletefile.s
@@ -0,0 +1,20 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char DeleteFile  (char *myName);
+
+	    .export _DeleteFile
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_DeleteFile:
+	sta r0L
+	stx r0H
+	jsr DeleteFile
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/deleterecord.s
+++ b/libsrc/geos/file/deleterecord.s
@@ -0,0 +1,18 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char DeleteRecord  (void);
+
+	    .export _DeleteRecord
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_DeleteRecord:
+	jsr DeleteRecord
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/findfile.s
+++ b/libsrc/geos/file/findfile.s
@@ -0,0 +1,20 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char FindFile  (char *myName);
+
+	    .export _FindFile
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_FindFile:
+	sta r6L
+	stx r6H
+	jsr FindFile
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/findftypes.s
+++ b/libsrc/geos/file/findftypes.s
@@ -0,0 +1,28 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char FindFTypes  (char *buffer, char fileType, char fileMax, char *Class);
+
+	    .export _FindFTypes
+	    .import popax, popa
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_FindFTypes:
+	sta r10L
+	stx r10H
+	jsr popa
+	sta r7H
+	jsr popa
+	sta r7L
+	jsr popax
+	sta r6L
+	stx r6H
+	jsr FindFTypes
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/followchain.s
+++ b/libsrc/geos/file/followchain.s
@@ -0,0 +1,26 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char FollowChain  (struct tr_se *myTrSe, char *buffer);
+
+	    .export _FollowChain
+	    .import popax
+	    .import gettrse
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_FollowChain:
+	sta r3L
+	stx r3H
+	jsr popax
+	jsr gettrse
+	sta r1L
+	stx r1H
+	jsr FollowChain
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/freefile.s
+++ b/libsrc/geos/file/freefile.s
@@ -0,0 +1,20 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char FreeFile  (struct trse myTrSe[]);
+
+	    .export _FreeFile
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_FreeFile:
+	sta r9L
+	stx r9H
+	jsr FreeFile
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/get1stdirentry.s
+++ b/libsrc/geos/file/get1stdirentry.s
@@ -0,0 +1,19 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 26.10.99
+
+; struct filehandle* Get1stDirEntry (void);
+
+	    .export _Get1stDirEntry
+
+	    .include "../inc/diskdrv.inc"
+	    .include "../inc/geossym.inc"
+
+_Get1stDirEntry:
+	jsr Get1stDirEntry
+	stx errno
+	lda r5L
+	ldx r5H
+	rts
--- a/libsrc/geos/file/getfhdrinfo.s
+++ b/libsrc/geos/file/getfhdrinfo.s
@@ -0,0 +1,20 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char GetFHdrInfo  (struct filehandle *myFile);
+
+	    .export _GetFHdrInfo
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_GetFHdrInfo:
+	sta r9L
+	stx r9H
+	jsr GetFHdrInfo
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/getnxtdirentry.s
+++ b/libsrc/geos/file/getnxtdirentry.s
@@ -0,0 +1,19 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 26.10.99
+
+; struct filehandle* GetNxtDirEntry (void);
+
+	    .export _GetNxtDirEntry
+
+	    .include "../inc/diskdrv.inc"
+	    .include "../inc/geossym.inc"
+
+_GetNxtDirEntry:
+	jsr GetNxtDirEntry
+	stx errno
+	lda r5L
+	ldx r5H
+	rts
--- a/libsrc/geos/file/insertrecord.s
+++ b/libsrc/geos/file/insertrecord.s
@@ -0,0 +1,18 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char InsertRecord  (void);
+
+	    .export _InsertRecord
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_InsertRecord:
+	jsr InsertRecord
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/nextrecord.s
+++ b/libsrc/geos/file/nextrecord.s
@@ -0,0 +1,18 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char NextRecord  (void);
+
+	    .export _NextRecord
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_NextRecord:
+	jsr NextRecord
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/openrecordfile.s
+++ b/libsrc/geos/file/openrecordfile.s
@@ -0,0 +1,20 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char OpenRecordFile  (char *myName);
+
+	    .export _OpenRecordFile
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_OpenRecordFile:
+	sta r0L
+	stx r0H
+	jsr OpenRecordFile
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/pointrecord.s
+++ b/libsrc/geos/file/pointrecord.s
@@ -0,0 +1,18 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char PointRecord  (char recordNum);
+
+	    .export _PointRecord
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_PointRecord:
+	jsr PointRecord
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/previousrecord.s
+++ b/libsrc/geos/file/previousrecord.s
@@ -0,0 +1,18 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char PreviousRecord  (void);
+
+	    .export _PreviousRecord
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+
+_PreviousRecord:
+	jsr PreviousRecord
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/readbyte.s
+++ b/libsrc/geos/file/readbyte.s
@@ -0,0 +1,17 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char ReadByte  (void);
+
+	    .export _ReadByte
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+
+_ReadByte:
+	jsr ReadByte
+	stx errno
+	rts
--- a/libsrc/geos/file/readfile.s
+++ b/libsrc/geos/file/readfile.s
@@ -0,0 +1,29 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char ReadFile  (struct tr_se *myTS, char *buffer, int length);
+
+	    .export _ReadFile
+	    .import popax
+	    .import gettrse
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_ReadFile:
+	sta r2L
+	stx r2H
+	jsr popax
+	sta r7L
+	stx r7H
+	jsr popax
+	jsr gettrse
+	sta r1L
+	stx r1H
+	jsr ReadFile
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/readrecord.s
+++ b/libsrc/geos/file/readrecord.s
@@ -0,0 +1,24 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char ReadRecord  (char *buffer, int length);
+
+	    .export _ReadRecord
+	    .import popax
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_ReadRecord:
+	sta r2L
+	stx r2H
+	jsr popax
+	sta r7L
+	stx r7H
+	jsr ReadRecord
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/renamefile.s
+++ b/libsrc/geos/file/renamefile.s
@@ -0,0 +1,24 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char RenameFile  (char *source, char *target);
+
+	    .export _RenameFile
+	    .import popax
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_RenameFile:
+	sta r0L
+	stx r0H
+	jsr popax
+	sta r6L
+	stx r6H
+	jsr RenameFile
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/savefile.s
+++ b/libsrc/geos/file/savefile.s
@@ -0,0 +1,20 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char SaveFile  (struct fileheader *myHeader);
+
+	    .export _SaveFile
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_SaveFile:
+	sta r9L
+	stx r9H
+	jsr SaveFile
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/updaterecordfile.s
+++ b/libsrc/geos/file/updaterecordfile.s
@@ -0,0 +1,18 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char UpdateRecordFile  (void);
+
+	    .export _UpdateRecordFile
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+
+_UpdateRecordFile:
+	jsr UpdateRecordFile
+	stx errno
+	txa
+	rts
--- a/libsrc/geos/file/writerecord.s
+++ b/libsrc/geos/file/writerecord.s
@@ -0,0 +1,24 @@
+
+;
+; Maciej 'YTM/Alliance' Witkowiak
+;
+; 25.12.99
+
+; char WriteRecord  (char *buffer, int length);
+
+	    .export _WriteRecord
+	    .import popax
+
+	    .include "../inc/jumptab.inc"
+	    .include "../inc/geossym.inc"
+	
+_WriteRecord:
+	sta r2L
+	stx r2H
+	jsr popax
+	sta r7L
+	stx r7H
+	jsr WriteRecord
+	stx errno
+	txa
+	rts