Added Microsoft BASIC tests, and abort the suite if anything fails

skx · Jan 25, 2025 · d40dc67 · d40dc67
1 parent 64e913f
commit d40dc67
Show file tree

Hide file tree

Showing 5 changed files with 28 additions and 0 deletions.
diff --git a/test/mbasic1.in b/test/mbasic1.in
@@ -0,0 +1,6 @@
+B:
+#MBASIC
+#PRINT 1 + 2 * 3#SYSTEM
+
+
+EXIT

diff --git a/test/mbasic1.pat b/test/mbasic1.pat
@@ -0,0 +1,3 @@
+7
+5.29
+Microsoft
diff --git a/test/mbasic2.in b/test/mbasic2.in
@@ -0,0 +1,11 @@
+B:
+#MBASIC
+10 FOR I=1 TO 5
+20  PRINT I,I*I
+30 NEXT I
+#LIST
+RUN
+SYSTEM
+
+
+EXIT
diff --git a/test/mbasic2.pat b/test/mbasic2.pat
@@ -0,0 +1,3 @@
+16
+5.29
+Microsoft
diff --git a/test/run-tests.sh b/test/run-tests.sh
@@ -14,4 +14,9 @@ for i in test/*.in ; do
 
     ./test/run-test.sh "${name}"
 
+    if [ $? -eq 1 ]; then
+        echo "Previous test, ${name}, failed.  Aborting"
+        exit 1
+    fi
+
 done
-Original file line number
+Diff line change
@@ -0,0 +1,6 @@
+    B:
+    #MBASIC
+    #PRINT 1 + 2 * 3#SYSTEM
+    EXIT
@@ Expand Down @@