cc65/libsrc/geos-common/file/readfile.s

;
; Maciej 'YTM/Elysium' Witkowiak
;
; 25.12.1999, 2.1.2003

; char ReadFile  (struct tr_se *myTS, char *buffer, int length);

	    .export _ReadFile
	    .import popax, setoserror
	    .import gettrse

	    .include "jumptab.inc"
	    .include "diskdrv.inc"
	    .include "geossym.inc"
	
_ReadFile:
	sta r2L
	stx r2H
	jsr popax
	sta r7L
	stx r7H
	jsr popax
	jsr gettrse
	sta r1L
	stx r1H
	jsr ReadFile
	jmp setoserror
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			`;`
all functions returning char in A now have X cleared git-svn-id: svn://svn.cc65.org/cc65/trunk@1868 b7a2c559-68d2-44c3-8de9-860c34a00d81 2003-01-02 01:50:39 +00:00			`; Maciej 'YTM/Elysium' Witkowiak`
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			`;`
all functions returning char in A now have X cleared git-svn-id: svn://svn.cc65.org/cc65/trunk@1868 b7a2c559-68d2-44c3-8de9-860c34a00d81 2003-01-02 01:50:39 +00:00			`; 25.12.1999, 2.1.2003`
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
			`; char ReadFile (struct tr_se myTS, char buffer, int length);`

			`.export _ReadFile`
all functions returning char in A now have X cleared git-svn-id: svn://svn.cc65.org/cc65/trunk@1868 b7a2c559-68d2-44c3-8de9-860c34a00d81 2003-01-02 01:50:39 +00:00			`.import popax, setoserror`
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			`.import gettrse`

Avoid paths in .include directives. The path needs to be rather set in the Makefile to allow to set it later depending on the target currently built. git-svn-id: svn://svn.cc65.org/cc65/trunk@5431 b7a2c559-68d2-44c3-8de9-860c34a00d81 2012-01-31 20:49:58 +00:00			`.include "jumptab.inc"`
On Apple GEOS all "low jumptable" entries went into 'diskdrv.inc'. So this needs to be included in quite some source files. git-svn-id: svn://svn.cc65.org/cc65/trunk@5511 b7a2c559-68d2-44c3-8de9-860c34a00d81 2012-02-09 09:24:09 +00:00			`.include "diskdrv.inc"`
Avoid paths in .include directives. The path needs to be rather set in the Makefile to allow to set it later depending on the target currently built. git-svn-id: svn://svn.cc65.org/cc65/trunk@5431 b7a2c559-68d2-44c3-8de9-860c34a00d81 2012-01-31 20:49:58 +00:00			`.include "geossym.inc"`
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
			`_ReadFile:`
			`sta r2L`
			`stx r2H`
			`jsr popax`
			`sta r7L`
			`stx r7H`
			`jsr popax`
			`jsr gettrse`
			`sta r1L`
			`stx r1H`
			`jsr ReadFile`
all functions returning char in A now have X cleared git-svn-id: svn://svn.cc65.org/cc65/trunk@1868 b7a2c559-68d2-44c3-8de9-860c34a00d81 2003-01-02 01:50:39 +00:00			`jmp setoserror`