6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-08-08 06:25:17 +00:00
Code Issues Projects Releases Wiki Activity

Atari: RealDOS adaptations

Browse Source 
RealDOS is a SpartaDOS clone. Handle it the same way as SpartaDOS.
This commit is contained in:
Christian Groessler
2018-09-06 15:55:07 +02:00
parent e9b8f5d814
commit b6ccd4d5d4
2 changed files with 7 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
libsrc/atari/lseek.s
View File

@@ -176,7 +176,7 @@ seek: jsr ldax0sp ; get lower word of new offset
.endproc .endproc
; check, whether seeking is supported ; check whether seeking is supported
; tmp3: iocb ; tmp3: iocb
; X: index into fd_table ; X: index into fd_table
; ;
@@ -194,8 +194,10 @@ chk_supp:
; do the test ; do the test
lda __dos_type lda __dos_type
cmp #SPARTADOS cmp #SPARTADOS
beq :+
cmp #REALDOS
bne ns1 bne ns1
txa : txa
pha pha
lda DOS+1 ; get SpartaDOS version lda DOS+1 ; get SpartaDOS version
cmp #$40 cmp #$40

4
libsrc/atari/syschdir.s
View File

@@ -3,7 +3,7 @@
; Based on on code by Christian Groessler ; Based on on code by Christian Groessler
; ;
; unsigned char __fastcall__ _syschdir (const char* name); ; unsigned char __fastcall__ _syschdir (const char* name);
; for SpartaDOS and MyDOS ; for SpartaDOS, RealDOS, and MyDOS
; ;
.include "atari.inc" .include "atari.inc"
@@ -65,6 +65,8 @@ ucok1:
lda __dos_type lda __dos_type
cmp #SPARTADOS cmp #SPARTADOS
beq :+ beq :+
cmp #REALDOS
beq :+
lda #CHDIR_MYDOS lda #CHDIR_MYDOS
.byte $2C ; BIT <abs> .byte $2C ; BIT <abs>
: lda #CHDIR_SPDOS : lda #CHDIR_SPDOS