mirror of
https://github.com/cc65/cc65.git
synced 2025-01-01 03:30:20 +00:00
Atari: RealDOS adaptations
RealDOS is a SpartaDOS clone. Handle it the same way as SpartaDOS.
This commit is contained in:
parent
e9b8f5d814
commit
b6ccd4d5d4
@ -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
|
||||
|
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user