Apple-2-SW/qasm
1
0
Fork 0
mirror of https://github.com/marketideas/qasm.git synced 2024-12-27 15:29:30 +00:00
Code Issues Projects Releases Wiki Activity

more mods for testruns

Browse Source
This commit is contained in:
marketideas 2019-11-20 10:38:23 -08:00
parent eba951f00f
commit 37ba8aaf40
4 changed files with 10 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
merlintests.sh
View File

@ -18,7 +18,7 @@ for S in $SRC ; do
BASE=${S/.S/} BASE=${S/.S/}
BASE=${BASE/.s/} BASE=${BASE/.s/}
cd ./testdata cd ./testdata
merlin32 $S 2>/dev/null >/dev/null merlin32 . $S 2>/dev/null >/dev/null
#merlin32 . $S 2>/dev/null #merlin32 . $S 2>/dev/null
R=?$ R=?$

5
runtests.sh
View File

@ -1,6 +1,6 @@
#!/bin/bash #!/bin/bash
OUTDIR=./testout OUTDIR=./qasmout
TMPFILE=/tmp/qasm_out.txt TMPFILE=/tmp/qasm_out.txt
rm -f $TMPFILE rm -f $TMPFILE
@ -40,6 +40,7 @@ for S in $SRC ; do
MSHA="Q" MSHA="Q"
QSHA="M" QSHA="M"
if [ -f ./m32out/$BASE.bin ] ; then if [ -f ./m32out/$BASE.bin ] ; then
MSHA=`sha256sum ./m32out/$BASE.bin | awk '{ print $1;}'` 2>/dev/null >/dev/null MSHA=`sha256sum ./m32out/$BASE.bin | awk '{ print $1;}'` 2>/dev/null >/dev/null
fi fi
@ -47,7 +48,7 @@ for S in $SRC ; do
if [ -f $OUTDIR/$BASE.bin ] ; then if [ -f $OUTDIR/$BASE.bin ] ; then
QSHA=`sha256sum $OUTDIR/$BASE.bin |awk '{print $1;}'` 2>/dev/null >/dev/null QSHA=`sha256sum $OUTDIR/$BASE.bin |awk '{print $1;}'` 2>/dev/null >/dev/null
fi fi
#echo "$MSHA $QSHA" #echo "MSHA=$MSHA QSHA=$QSHA"
shapass=0; shapass=0;
CX=" " CX=" "

10
testdata/3001-lroathe.S vendored
View File

@ -114,7 +114,7 @@ START
adc _num1+dum1 adc _num1+dum1
sbc _num1+dum1 sbc _num1+dum1
bit _num1+dum0 bit _num1+dum0
sta _num1+dum0 ;(FIXED): can't use sta _num1+dum0 sta _num1+dum0 ;(FIXED): can't use sta _num1+dum0 '
stz _num1+dum0 stz _num1+dum0
lda _num1+dum0,x lda _num1+dum0,x
@ -180,7 +180,7 @@ myQuit
ldaz $FFFF ; forced DP ldaz $FFFF ; forced DP
lda: $FFFF ; forced ABS (any char but 'L', 'D', and 'Z" lda: $FFFF ; forced ABS (any char but 'L', 'D', and 'Z'
ldal $FFFF ; forced long abs (3 byte address) ldal $FFFF ; forced long abs (3 byte address)
ldaz $05 ldaz $05
@ -338,8 +338,6 @@ myQuit
lda #^$A51234 ;bank lda #^$A51234 ;bank
mx MX
lda $0008 ;ZP lda $0008 ;ZP
lda $08 ;ZP lda $08 ;ZP
lda $ffff-$fff7 ;ZP lda $ffff-$fff7 ;ZP
@ -362,8 +360,8 @@ L00BC bit L00BC
hex ;no error hex ;no error
hex 11,22,33,44,55,66,77,88,99 hex 11,22,33,44,55,66,77,88,99
hex 112233445566778899F ;hex 112233445566778899F
hex 112233445I566778899FF ;hex 112233445I566778899FF
hex aabb,CC,0123456789abcdefABCDEF,ff hex aabb,CC,0123456789abcdefABCDEF,ff

4
testdata/3002-testfile.S vendored
View File

@ -14,7 +14,7 @@ lexpr = $010203
immed = $123456 immed = $123456
neg equ -16 neg equ -16
]var1 = v1234 *]var1 = v1234
;lst off ;lst off
start00 start00
@ -308,5 +308,5 @@ startF0
inc expr,x inc expr,x
sbcl lexpr,x sbcl lexpr,x
lst off lst off
sav ./test.bin ;sav ./test.bin