uxn

commit 3967d27173bcb638ea974a94a49f8f1e1ff64cc1
parent 5aca7e50706fb02fdaef0b90bcf101a5d7920bc1
Author: Andrew Alderwick <andrew@alderwick.co.uk>
Date:   Thu,  7 Oct 2021 22:58:50 +0100

Added file name to asma error printout.

Diffstat:
M
projects/library/asma.tal
 | 
9
++++++---

1 file changed, 6 insertions(+), 3 deletions(-)
diff --git a/projects/library/asma.tal b/projects/library/asma.tal
@@ -60,17 +60,20 @@
 )
 
 @asma-print-error ( -- )
+	.File/name DEI2 ;asma-print-string JSR2
+	;&line ;asma-print-string JSR2
+	;asma/line LDA2 ;asma-print-short JSR2
+	#3a .Console/error DEO
+	#20 .Console/error DEO
 	;asma/error LDA2 ;asma-print-string JSR2
 	#3a .Console/error DEO
 	#20 .Console/error DEO
 	;asma/orig-token LDA2 ;asma-print-string JSR2
-	;&line ;asma-print-string JSR2
-	;asma/line LDA2 ;asma-print-short JSR2
 	#2e .Console/error DEO
 	#0a .Console/error DEO
 	JMP2r
 
-	&line 20 "on 20 "line 20 00
+	&line 20 "line 20 00
 
 @asma-print-line-count ( -- )
 	;asma/log-level LDA #01 AND #00 EQU ,&skip JCN