cc65/libsrc/geos/disk/readblock.s


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

; char ReadBlock (struct tr_se myTS, char *buffer);

	    .import popax, setoserror
	    .import gettrse
	    .export _ReadBlock

	    .include "../inc/jumptab.inc"
	    .include "../inc/geossym.inc"
	
_ReadBlock:
	sta r4L
	stx r4H
	jsr popax
	jsr gettrse
	sta r1L
	stx r1H
	jsr ReadBlock
	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			`; 21.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 ReadBlock (struct tr_se myTS, char *buffer);`

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`
			`.export _ReadBlock`

			`.include "../inc/jumptab.inc"`
			`.include "../inc/geossym.inc"`

			`_ReadBlock:`
			`sta r4L`
			`stx r4H`
			`jsr popax`
			`jsr gettrse`
			`sta r1L`
			`stx r1H`
			`jsr ReadBlock`
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`