Print test id

This commit is contained in:
Devine Lu Linvega 2024-02-13 18:26:17 -08:00
parent c9d19d498c
commit 6a832c3a49
1 changed files with 7 additions and 1 deletions

View File

@ -3,6 +3,7 @@
|0013
@Zeropage &byte $1 &short $2
@id $1
|0100
@ -128,15 +129,20 @@ BRK
LDA2k JSR2 DUP ?&pass
;Dict/missed pstr
[ LIT2 &name $2 ] pstr/ #0a18 DEO
[ LIT2 &name $2 ] pstr/
[ LIT2 "# 18 ] DEO
[ LIT2 "a -id ] LDZ ADD #18 DEO
#0a18 DEO
#01 ;on-reset/fail STA JMP2r
&pass
.id LDZ INC .id STZ
JMP2r
@set ( name* -- f )
;run-test/name STA2 #01
[ LIT2 ff -id ] STZ
JMP2r