6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-04-08 19:38:55 +00:00
Code Issues Projects Releases Wiki Activity

Fix doesclrscrafterexit() function on atarixl target.

Browse Source 
On atarixl, the screen is always cleared, regardless of the running DOS.
This commit is contained in:
Christian Groessler 2016-06-13 21:16:27 +02:00
parent 271b65aa70
commit 4aa9a414c6
2 changed files with 16 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
libsrc/atari/doesclrscr.s
View File

@ -7,13 +7,14 @@
;
.export _doesclrscrafterexit
.import __dos_type
.include "atari.inc"
.import __is_cmdline_dos
.import return1
.ifdef __ATARIXL__
_doesclrscrafterexit = return1 ; the c65 runtime always clears the screen at program termination
.else
_doesclrscrafterexit:
ldx #0
lda __dos_type
cmp #MAX_DOS_WITH_CMDLINE + 1
txa
rol a
jsr __is_cmdline_dos ; currently (unless a DOS behaving differently is popping up)
eor #$01 ; we can get by with the inverse of __is_cmdline_dos
rts
.endif

11
libsrc/atari/is_cmdline_dos.s
View File

@ -7,9 +7,14 @@
;
.export __is_cmdline_dos
.import _doesclrscrafterexit
.import __dos_type
.include "atari.inc"
__is_cmdline_dos:
jsr _doesclrscrafterexit ; currently (unless a DOS behaving differently is popping up)
eor #$01 ; we can get by with the inverse of _doesclrscrafterexit
ldx #0
lda __dos_type
cmp #MAX_DOS_WITH_CMDLINE + 1
txa
rol a
eor #$01
rts