6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-09-30 08:57:49 +00:00
Code Issues Projects Releases Wiki Activity

Merge pull request #311 from groessler/something_to_pull

Browse Source 
Fix doesclrscrafterexit() function on atarixl target.
This commit is contained in:
Oliver Schmidt 2016-06-15 08:59:50 +02:00 committed by GitHub
commit 2c8b8d90bf
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