From 4673fde605090320fbab227e56bb085eec97362a Mon Sep 17 00:00:00 2001
From: Bad Diode <bd@badd10de.dev>
Date: Sun, 10 Oct 2021 12:11:45 +0200
Subject: Add boolean primitives and more (better) tests

---
 tests/arithmetic_expected.txt | 18 +++++++++---------
 tests/booleans_expected.txt   | 34 ++++++++++++++++++++++++++++++++++
 2 files changed, 43 insertions(+), 9 deletions(-)
 create mode 100644 tests/booleans_expected.txt

(limited to 'tests')

diff --git a/tests/arithmetic_expected.txt b/tests/arithmetic_expected.txt
index 590166a..16445dc 100644
--- a/tests/arithmetic_expected.txt
+++ b/tests/arithmetic_expected.txt
@@ -1,9 +1,9 @@
-110
-6
-25
--40
-70
--66
-9
-1
-44000
+(+ 10 100) -> 110
+(+ 1 -2 3 4) -> 6
+(- 100 75) -> 25
+(- 10 20 30) -> -40
+(* 10 7) -> 70
+(* -1 66) -> -66
+(/ 45 5) -> 9
+(/ 10 5 2) -> 1
+(* 20 (+ 100 (- 50 30) (/ 300 3)) 10) -> 44000
diff --git a/tests/booleans_expected.txt b/tests/booleans_expected.txt
new file mode 100644
index 0000000..81f0313
--- /dev/null
+++ b/tests/booleans_expected.txt
@@ -0,0 +1,34 @@
+(boolean? true) -> true
+(boolean? false) -> true
+(boolean? 1) -> false
+(boolean? 5) -> false
+(boolean? "string") -> false
+(boolean? (+ 1 2 3)) -> false
+(boolean? (not 1)) -> true
+(not true) -> false
+(not false) -> true
+(not (not true)) -> true
+(not (not false)) -> false
+(not 1) -> false
+(not (not 1)) -> true
+(not "string") -> false
+(not (not "string")) -> true
+(and 1 "string" 4 true) -> true
+(and true true true) -> true
+(and (+ 1 2 3)) -> true
+(and false false false) -> false
+(and true false false) -> false
+(and false true false) -> false
+(and false true true) -> false
+(and (not false) true true) -> true
+(or 1 "string" 4 true) -> true
+(or false 1) -> true
+(or false "string") -> true
+(or false) -> false
+(or true true true) -> true
+(or false false false) -> false
+(or true false false) -> true
+(or false true false) -> true
+(or false true true) -> true
+(or (not false) true true) -> true
+(or (not true) false) -> false
-- 
cgit v1.2.1