cc65/libsrc/geos-common/system/setoserror.s

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

	    .export setoserror
	    .import __oserror

setoserror:
	stx __oserror
	txa
	ldx #0			; X is cleared (high byte for promoting char to int)
	tay			; Y register is used just to save flags state
	rts
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`
			`;`
			`; 2.1.2003`
			`;`

			`.export setoserror`
			`.import __oserror`

			`setoserror:`
Normalized coding style. git-svn-id: svn://svn.cc65.org/cc65/trunk@5500 b7a2c559-68d2-44c3-8de9-860c34a00d81 2012-02-08 16:56:54 +00:00			`stx __oserror`
			`txa`
			`ldx #0 ; X is cleared (high byte for promoting char to int)`
			`tay ; Y register is used just to save flags state`
			`rts`