6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-01-13 09:31:53 +00:00
Code Issues Projects Releases Wiki Activity

ser_unload didn't return a valid error code.

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@3754 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz 2006-06-04 10:31:33 +00:00
parent 4e599d372f
commit 0b17f91797
1 changed files with 12 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
libsrc/serial/ser_unload.s
View File

@ -5,32 +5,34 @@
; /* Unload the currently loaded driver. */
.import ser_clear_ptr
.include "ser-kernel.inc"
.include "ser-error.inc"
.include "modload.inc"
.import ser_clear_ptr
.import return0
_ser_unload:
lda _ser_drv
pha ; Save pointer to driver
ora _ser_drv+1
beq no_driver ; No driver
lda _ser_drv
pha
lda _ser_drv+1
pha ; Save pointer to driver
pha
jsr _ser_uninstall ; Uninstall the driver
jsr _ser_uninstall ; Deinstall the driver
pla
tax
tax
pla ; Get pointer to driver
jmp _mod_free ; Free the driver
jsr _mod_free ; Free the driver
jmp return0 ; Return SER_ERR_OK
no_driver:
tax ; X = 0
pla ; Remove pushed junk
lda #<SER_ERR_NO_DRIVER
rts