added test files for symbol substitutions

git-svn-id: https://svn.code.sf.net/p/acme-crossass/code-0/trunk@393 4df02467-bbd4-4a76-a152-e7ce94205b78
This commit is contained in:
marcobaye 2024-08-11 21:07:32 +00:00
parent b3ef885385
commit fcfb32ed0a
5 changed files with 15 additions and 0 deletions

3
testing/errors/subst1.a Normal file
View File

@ -0,0 +1,3 @@
*=$1000
;sub= we do not define sub at all
base?sub nop ; -> "neither number nor string"

3
testing/errors/subst2.a Normal file
View File

@ -0,0 +1,3 @@
*=$1000
!set sub = [2,3] ; sub is a list
base?sub nop ; -> "neither number nor string"

3
testing/errors/subst3.a Normal file
View File

@ -0,0 +1,3 @@
*=$1000
lda sub ; sub is undefined
base?sub nop ; -> "undefined or not integer"

3
testing/errors/subst4.a Normal file
View File

@ -0,0 +1,3 @@
*=$1000
!set sub = .5 ; sub is a float
base?sub nop ; -> "undefined or not integer"

3
testing/errors/subst5.a Normal file
View File

@ -0,0 +1,3 @@
*=$1000
!set sub = 7 ; sub is defined okay, but:
base?(sub nop ; -> "does not end with ')' character."