d6
/
uxn
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(asma) Disable recursion tests that no longer function.

This commit is contained in:
Andrew Alderwick 2023-01-02 15:07:34 +00:00
parent d94a84bc93
commit 1cb66df868
2 changed files with 8 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
etc/asma-test.sh
View File

@ -86,14 +86,14 @@ expect_failure 'Memory overwrite: SUB' <<'EOD'
|2000 ADD |2000 ADD
|1000 SUB |1000 SUB
EOD EOD
expect_failure 'Recursion level too deep:' <<'EOD' # expect_failure 'Recursion level too deep:' <<'EOD'
%me { you } # %me { you }
%you { me } # %you { me }
|1000 me # |1000 me
EOD # EOD
expect_failure 'Recursion level too deep: ~asma-test/in.tal' <<'EOD' # expect_failure 'Recursion level too deep: ~asma-test/in.tal' <<'EOD'
~asma-test/in.tal # ~asma-test/in.tal
EOD # EOD
expect_failure 'Label not found: ;blah' <<'EOD' expect_failure 'Label not found: ;blah' <<'EOD'
|1000 ;blah |1000 ;blah
EOD EOD

7
projects/library/asma.tal
View File

@ -833,7 +833,6 @@
( hex short ) ,asma-short-helper/raw JMP ( hex short ) ,asma-short-helper/raw JMP
&not-hex &not-hex
.System/rst DEI #e0 GTH ,&too-deep JCN
;asma-trees/macros ;asma-traverse-tree JSR2 ,&not-macro JCN ;asma-trees/macros ;asma-traverse-tree JSR2 ,&not-macro JCN
&macro-loop &macro-loop
@ -855,12 +854,7 @@
;asma-msg-token ;asma/error STA2 ;asma-msg-token ;asma/error STA2
JMP2r JMP2r
&too-deep
;asma-msg-too-deep ;asma/error STA2
JMP2r
@asma-include @asma-include
.System/rst DEI #e0 GTH ,asma-normal-body/too-deep JCN
;heap LDA2 ;heap LDA2
;asma/token LDA2 ;append-heap-string JSR2 ;asma/token LDA2 ;append-heap-string JSR2
;asma-assemble-file-pass JSR2 ;asma-assemble-file-pass JSR2
@ -876,7 +870,6 @@
@asma-msg-token "Unrecognised 20 "token 00 @asma-msg-token "Unrecognised 20 "token 00
@asma-msg-macro "Macro 20 "already 20 "exists 00 @asma-msg-macro "Macro 20 "already 20 "exists 00
@asma-msg-rewound "Memory 20 "overwrite 00 @asma-msg-rewound "Memory 20 "overwrite 00
@asma-msg-too-deep "Recursion 20 "level 20 "too 20 "deep 00
@asma-msg-redefined "Label 20 "redefined 00 @asma-msg-redefined "Label 20 "redefined 00
( trees ) ( trees )