aboutsummaryrefslogtreecommitdiff
path: root/tests/eval/or-and.testscript
diff options
context:
space:
mode:
authorBoris Kolpackov <boris@codesynthesis.com>2018-09-03 16:37:32 +0200
committerKaren Arutyunov <karen@codesynthesis.com>2018-09-04 16:29:59 +0300
commit5007870b52aa549971824959a55ad3bb886f09e0 (patch)
treeb0ef7f24c0b9ece2ed23f3c1792f16da324e4171 /tests/eval/or-and.testscript
parent09d60452a80d14d9b8bf3a9395860b50683fa1e8 (diff)
Rename .test/test{} to .testscript/testscript{}
Diffstat (limited to 'tests/eval/or-and.testscript')
-rw-r--r--tests/eval/or-and.testscript28
1 files changed, 28 insertions, 0 deletions
diff --git a/tests/eval/or-and.testscript b/tests/eval/or-and.testscript
new file mode 100644
index 0000000..7796f74
--- /dev/null
+++ b/tests/eval/or-and.testscript
@@ -0,0 +1,28 @@
+# file : tests/eval/or-and.testscript
+# copyright : Copyright (c) 2014-2018 Code Synthesis Ltd
+# license : MIT; see accompanying LICENSE file
+
+# Test logical operators (eval-or, eval-and).
+
+.include ../common.testscript
+
+$* <'print (false || false)' >'false' : or-false
+$* <'print (false || true)' >'true' : or-true-1
+$* <'print (true || false)' >'true' : or-true-2
+
+$* <'print (false && true)' >'false' : and-false-1
+$* <'print (true && false)' >'false' : and-false-2
+$* <'print (true && true)' >'true' : and-true
+
+: associativity
+:
+: Also tests short-circuit.
+:
+{
+ $* <'print (true || $bogus($foo) || false)' >'true' : or
+ $* <'print (false && $bogus($foo) && false)' >'false' : and
+}
+
+: priority
+:
+$* <'print (false && true || true)' >'true'