From: ol.sc <ol.sc@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Sat, 4 Feb 2012 21:53:20 +0000 (+0000)
Subject: "Apple disk names are null-terminated strings of 16 characters or less (counting... 
X-Git-Tag: V2.13.3~17
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=8a06174cb420e2d708f3e2808107a7b1cd880b23;p=cc65

"Apple disk names are null-terminated strings of 16 characters or less (counting the null-terminator)."

git-svn-id: svn://svn.cc65.org/cc65/trunk@5448 b7a2c559-68d2-44c3-8de9-860c34a00d81
---

diff --git a/libsrc/geos-common/disk/getptrcurdknm.s b/libsrc/geos-common/disk/getptrcurdknm.s
index 36797f4e9..f0fae0ec4 100644
--- a/libsrc/geos-common/disk/getptrcurdknm.s
+++ b/libsrc/geos-common/disk/getptrcurdknm.s
@@ -23,7 +23,11 @@ _GetPtrCurDkNm:
 	txa
 	bne fin
 namelp:	lda (ptr4),y
+.ifdef  __GEOS_CBM__
 	cmp #$a0
+.else
+	cmp #0
+.endif
 	beq fin
 	sta (ptr3),y
 	iny