From: Christian Groessler <chris@groessler.org>
Date: Thu, 6 Sep 2018 13:55:07 +0000 (+0200)
Subject: Atari: RealDOS adaptations
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=b6ccd4d5d44d6f2a19f625d466f291d2ae833430;p=cc65

Atari: RealDOS adaptations

RealDOS is a SpartaDOS clone. Handle it the same way as SpartaDOS.
---

diff --git a/libsrc/atari/lseek.s b/libsrc/atari/lseek.s
index 889976f5b..462f2f90b 100644
--- a/libsrc/atari/lseek.s
+++ b/libsrc/atari/lseek.s
@@ -176,7 +176,7 @@ seek:   jsr     ldax0sp         ; get lower word of new offset
 
 .endproc
 
-; check, whether seeking is supported
+; check whether seeking is supported
 ; tmp3:         iocb
 ; X:            index into fd_table
 ;
@@ -194,8 +194,10 @@ chk_supp:
 ; do the test
         lda     __dos_type
         cmp     #SPARTADOS
+        beq     :+
+        cmp     #REALDOS
         bne     ns1
-        txa
+:       txa
         pha
         lda     DOS+1           ; get SpartaDOS version
         cmp     #$40
diff --git a/libsrc/atari/syschdir.s b/libsrc/atari/syschdir.s
index d57708384..9e4c33a19 100644
--- a/libsrc/atari/syschdir.s
+++ b/libsrc/atari/syschdir.s
@@ -3,7 +3,7 @@
 ; Based on on code by Christian Groessler
 ;
 ; unsigned char __fastcall__ _syschdir (const char* name);
-; for SpartaDOS and MyDOS
+; for SpartaDOS, RealDOS, and MyDOS
 ;
 
         .include "atari.inc"
@@ -65,6 +65,8 @@ ucok1:
         lda     __dos_type
         cmp     #SPARTADOS
         beq     :+
+        cmp     #REALDOS
+        beq     :+
         lda     #CHDIR_MYDOS
         .byte   $2C             ; BIT <abs>
 :       lda     #CHDIR_SPDOS