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`
			`;`

Removed (pretty inconsistently used) tab chars from source code base. 2013-05-09 11:56:54 +00:00			`.export setoserror`
			`.import __oserror`
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
			`setoserror:`
Removed (pretty inconsistently used) tab chars from source code base. 2013-05-09 11: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`