Fix receiving archived unnamed variables.

2021-04-13 20:02:07 -04:00 · 2021-04-13 20:02:07 -04:00 · 3210d78938
commit 3210d78938
parent 397ab473a9
1 changed files with 10 additions and 5 deletions
--- a/src/var.asm
+++ b/src/var.asm
@ -124,11 +124,16 @@ _get_var_data_ptr:
 	ex	de,hl
 	bit	15,bc
 	ret	nz
-	ld	bc,9
-	add	hl,bc
-	ld	c,(hl)
-	add	hl,bc
-	inc	hl
+	ex	de,hl
+	call	ti.Sym_Prog_non_t_Lst
+	jq	z,.named
+	ld	c,2
+.named:
+	ex	de,hl
+	ld	de,10
+	add	hl,de
+	ld	e,c
+	add	hl,de
 	ret

 	section	.text