X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=libsrc%2Fatari%2Fgetdefdev.s;h=a6d13e86e84e97d66bfbe36ff495d357a2f2761d;hb=6f7952ec5a0b0832ba63b0b706f4489aec475bd4;hp=8878f80601a0e13bcf41b8d81fcce50108e87391;hpb=098dfa2168d3eda4632f9e8acb4f87a705a997a0;p=cc65

diff --git a/libsrc/atari/getdefdev.s b/libsrc/atari/getdefdev.s
index 8878f8060..a6d13e86e 100644
--- a/libsrc/atari/getdefdev.s
+++ b/libsrc/atari/getdefdev.s
@@ -1,7 +1,7 @@
 ;
-; Freddy Offenga & Christian Groessler, August 2003
+; Freddy Offenga & Christian Groessler, December 2004
 ;
-; function to get default device: char *getdefdev(void);
+; function to get default device: char *_getdefdev(void);
 ;
 ; SpartaDOS:
 ; the ZCRNAME routine is only used to get the default drive because
@@ -16,11 +16,15 @@
 
 	.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
+	.constructor	__getdefdev,24
+.endif
 
 ; Get default device (LBUF will be destroyed!!)
 
-_getdefdev:
+__getdefdev:
 
 	lda	__dos_type	; which DOS?
 	cmp	#ATARIDOS
@@ -62,21 +66,25 @@ crvec:	jsr	$FFFF		; will be set to crunch vector
 
 	ldy	#COMFNAM	;  COMFNAM is always "Dn:"
 	lda	(DOSVEC),y
-	sta	defdev
+	sta	__defdev
 	iny
 	lda	(DOSVEC),y
-	sta	defdev+1
+	sta	__defdev+1
 
-; return ointer to default device
+; Return pointer to default device
 
-finish:	lda	#<defdev
-	ldx	#>defdev
+finish:	lda	#<__defdev
+	ldx	#>__defdev
 	rts
 
 	.data
 
 ; Default device
 
-defdev:
+__defdev:
+.ifdef	DEFAULT_DEVICE
+	.byte	'D', '0'+DEFAULT_DEVICE, ':', 0
+.else
 	.byte	"D1:", 0
+.endif