summaryrefslogtreecommitdiff
path: root/apps/examples/bas/tests/test50.bas
diff options
context:
space:
mode:
Diffstat (limited to 'apps/examples/bas/tests/test50.bas')
-rw-r--r--apps/examples/bas/tests/test50.bas36
1 files changed, 36 insertions, 0 deletions
diff --git a/apps/examples/bas/tests/test50.bas b/apps/examples/bas/tests/test50.bas
new file mode 100644
index 000000000..4155ca52b
--- /dev/null
+++ b/apps/examples/bas/tests/test50.bas
@@ -0,0 +1,36 @@
+#!/bin/sh
+
+echo -n $0: 'Min and max function... '
+
+cat >test.bas <<'eof'
+print min(1,2)
+print min(2,1)
+print min(-0.3,0.3)
+print min(-0.3,4)
+print max(1,2)
+print max(2,1)
+print max(-0.3,0.3)
+print max(-0.3,4)
+eof
+
+cat >test.ref <<'eof'
+ 1
+ 1
+-0.3
+-0.3
+ 2
+ 2
+ 0.3
+ 4
+eof
+
+sh ./test/runbas test.bas >test.data
+
+if cmp test.ref test.data
+then
+ rm -f test.*
+ echo passed
+else
+ echo failed
+ exit 1
+fi