commit 035e0d8a3ac0544fa88882f174bb6907ad2a38bf
parent a635fea52f9e06a4848b85d55d1af3c5c38a38e4
Author: Andrew Alderwick <andrew@alderwick.co.uk>
Date: Thu, 28 Oct 2021 23:12:49 +0100
Fixed error message when zero-page label is not found
Diffstat:
2 files changed, 13 insertions(+), 0 deletions(-)
diff --git a/etc/asma-test.sh b/etc/asma-test.sh
@@ -70,5 +70,14 @@ EOD
expect_failure 'Recursion level too deep: include' <<'EOD'
include asma-test/in.tal
EOD
+expect_failure 'Label not found: ;blah' <<'EOD'
+|1000 ;blah
+EOD
+expect_failure 'Label not found: ,blah' <<'EOD'
+|1000 ,blah
+EOD
+expect_failure 'Label not found: .blah' <<'EOD'
+|1000 .blah
+EOD
echo 'All OK'
diff --git a/projects/library/asma.tal b/projects/library/asma.tal
@@ -671,7 +671,11 @@ include projects/library/heap.tal
JMP2r
¬-zero-page
+ ;asma/pass LDA #00 EQU
+ ;asma/error LDA2 ORA
+ ORA ,&ignore-error JCN
;asma-msg-zero-page ;asma/error STA2
+ &ignore-error
JMP2r
@asma-literal-rel-addr