1
0
mirror of https://github.com/cc65/cc65.git synced 2024-06-09 06:29:38 +00:00
cc65/libsrc/tgi/tgi_unload.s

26 lines
597 B
ArmAsm
Raw Normal View History

;
; Ullrich von Bassewitz, 21.06.2002
;
; void __fastcall__ tgi_unload (void);
; /* Unload the currently loaded driver. */
.include "tgi-kernel.inc"
.include "modload.inc"
.import tgi_clear_ptr
.proc _tgi_unload
jsr _tgi_done ; Switch off graphics
jsr tgi_uninstall ; Allow the driver to clean up
lda _tgi_drv
ldx _tgi_drv+1
jsr _mod_free ; Free the driver
jmp tgi_clear_ptr ; Clear the driver pointer and exit
.endproc