The spans do now contain the size of a span, no longer the end offset.

[cc65] / libsrc / atari / getdefdev.s

diff --git a/libsrc/atari/getdefdev.s b/libsrc/atari/getdefdev.s
index 7712684aad5c077cc57c0c6d136216b81d9cb4bd..a6d13e86e84e97d66bfbe36ff495d357a2f2761d 100644 (file)
--- a/libsrc/atari/getdefdev.s
+++ b/libsrc/atari/getdefdev.s
@@ -16,19 +16,16 @@
 
        .include        "atari.inc"
        .import         __dos_type
-       .export         __getdefdev             ; get default device (e.g. "D1:")
+       .export         __getdefdev             ; get default device
+       .export         __defdev                ; this is the default device string (e.g. "D1:")
 .ifdef DYNAMIC_DD
-       .export         __defdev
+       .constructor    __getdefdev,24
 .endif
 
 ; Get default device (LBUF will be destroyed!!)
 
 __getdefdev:
 
-.ifdef DEFAULT_DEVICE
-       lda     #'0'+DEFAULT_DEVICE
-       sta     __defdev+1
-.endif
        lda     __dos_type      ; which DOS?
        cmp     #ATARIDOS
        beq     finish
@@ -85,5 +82,9 @@ finish:       lda     #<__defdev
 ; Default device
 
 __defdev:
+.ifdef DEFAULT_DEVICE
+       .byte   'D', '0'+DEFAULT_DEVICE, ':', 0
+.else
        .byte   "D1:", 0
+.endif