[BASIC] LINPUT(#)/BINPUT# fix spurious STRING TOO LONG after string GC (

X16Community#197)
mooinglemur · Oct 16, 2023 · 75eeb64 · 75eeb64
1 parent d9d4b13
commit 75eeb64
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/basic/x16additions.s b/basic/x16additions.s
@@ -823,8 +823,10 @@ linput:
 	lda #buflen
 
 in2var:             ; input (line or block) to var
-	sta size        ; store max length
+	pha
 	jsr strspa      ; allocate string space
+	pla
+	sta size        ; store max length
 
 	ldy #0
 in2varc: