cc65/libsrc/atari/dioqsize.s

;
; Christian Groessler, February 2005
;
; unsigned __fastcall__ dio_query_sectsize(dhandle_t handle);
;

	.include	"atari.inc"
	.export		_dio_query_sectsize
	.importzp	ptr1,tmp1
	.import		popax, __oserror

.proc	_dio_query_sectsize

	sta	ptr1		; handle
	stx	ptr1+1 

	lda	#0
	sta	__oserror

	ldy	#sst_sectsize+1
	lda	(ptr1),y
	tax
	dey
	lda	(ptr1),y
	rts

.endproc
initial check-in git-svn-id: svn://svn.cc65.org/cc65/trunk@3391 b7a2c559-68d2-44c3-8de9-860c34a00d81 2005-02-19 00:57:26 +00:00			`;`
			`; Christian Groessler, February 2005`
			`;`
Removed DIO specific typedefs which were just aliases to basic types and replaced the term 'drive' with 'device' in order to harmonize with the recently added device.h. git-svn-id: svn://svn.cc65.org/cc65/trunk@5847 b7a2c559-68d2-44c3-8de9-860c34a00d81 2012-10-11 18:22:49 +00:00			`; unsigned __fastcall__ dio_query_sectsize(dhandle_t handle);`
initial check-in git-svn-id: svn://svn.cc65.org/cc65/trunk@3391 b7a2c559-68d2-44c3-8de9-860c34a00d81 2005-02-19 00:57:26 +00:00			`;`

			`.include "atari.inc"`
			`.export _dio_query_sectsize`
			`.importzp ptr1,tmp1`
			`.import popax, __oserror`

			`.proc _dio_query_sectsize`

			`sta ptr1 ; handle`
			`stx ptr1+1`

			`lda #0`
			`sta __oserror`

			`ldy #sst_sectsize+1`
			`lda (ptr1),y`
			`tax`
			`dey`
			`lda (ptr1),y`
			`rts`

			`.endproc`