From 22b55ae7fed5262fa3f038240b2dfb7e4109156c Mon Sep 17 00:00:00 2001
From: cuz <cuz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Thu, 8 Mar 2001 14:48:00 +0000
Subject: [PATCH] Don't hardcode the stack location

git-svn-id: svn://svn.cc65.org/cc65/trunk@609 b7a2c559-68d2-44c3-8de9-860c34a00d81
---
 libsrc/c64/crt0.s | 5 +++--
 libsrc/c64/read.s | 5 ++++-
 2 files changed, 7 insertions(+), 3 deletions(-)

diff --git a/libsrc/c64/crt0.s b/libsrc/c64/crt0.s
index a6cee8c22..397e51bcf 100644
--- a/libsrc/c64/crt0.s
+++ b/libsrc/c64/crt0.s
@@ -8,6 +8,7 @@
 	.import		initlib, donelib
        	.import	       	zerobss, push0
 	.import	     	_main
+	.import		__RAM_START__, __RAM_SIZE__	; Linker generated
 
 	.include     	"c64.inc"
 	.include     	"../cbm/cbm.inc"
@@ -85,9 +86,9 @@ L1:	lda	sp,x
        	ora	#$06		; Enable kernal+I/O, disable basic
 	sta	$01
 
-	lda    	#<$D000
+	lda    	#<(__RAM_START__ + __RAM_SIZE__)
 	sta	sp
-	lda	#>$D000
+	lda	#>(__RAM_START__ + __RAM_SIZE__)
        	sta	sp+1   		; Set argument stack ptr
 
 ; Call module constructors
diff --git a/libsrc/c64/read.s b/libsrc/c64/read.s
index 1aa40ad1e..22d7b1d37 100644
--- a/libsrc/c64/read.s
+++ b/libsrc/c64/read.s
@@ -26,7 +26,10 @@ _read:	jsr	popax 		; get count
 L1:    	lda	ptr2
    	ora	ptr2+1		; count zero?
    	beq	L9
-   	jsr	BASIN
+	dec	ptr2
+	bne	L1a
+	dec	ptr2+1
+L1a:   	jsr	BASIN
    	ldy	#0
    	sta	(ptr1),y	; save char
    	inc	ptr1
-- 
2.39.5