aboutsummaryrefslogtreecommitdiff
path: root/tests/math/greaterthan
diff options
context:
space:
mode:
authormryouse2022-07-03 01:00:18 +0000
committermryouse2022-07-03 01:00:18 +0000
commite169e50e9d2ab5584e3b72ed069e7695a123e1e7 (patch)
tree47c0ec4120518807e3a60a133502e9e84f126153 /tests/math/greaterthan
parent74a048dd493788bab9f9c93b0ed6d925a998822b (diff)
initial commit of tests for math things
Diffstat (limited to 'tests/math/greaterthan')
-rw-r--r--tests/math/greaterthan/bad_arity_one.neb2
-rw-r--r--tests/math/greaterthan/bad_arity_three.neb2
-rw-r--r--tests/math/greaterthan/bad_arity_zero.neb2
-rw-r--r--tests/math/greaterthan/bad_type_bool.neb2
-rw-r--r--tests/math/greaterthan/bad_type_list.neb2
-rw-r--r--tests/math/greaterthan/bad_type_string.neb2
-rw-r--r--tests/math/greaterthan/bad_type_type.neb2
-rw-r--r--tests/math/greaterthan/happy.neb9
8 files changed, 23 insertions, 0 deletions
diff --git a/tests/math/greaterthan/bad_arity_one.neb b/tests/math/greaterthan/bad_arity_one.neb
new file mode 100644
index 0000000..08c456a
--- /dev/null
+++ b/tests/math/greaterthan/bad_arity_one.neb
@@ -0,0 +1,2 @@
+(> 7)
+; panic! [1] '>': expected [2] arguments, received 1
diff --git a/tests/math/greaterthan/bad_arity_three.neb b/tests/math/greaterthan/bad_arity_three.neb
new file mode 100644
index 0000000..039cf79
--- /dev/null
+++ b/tests/math/greaterthan/bad_arity_three.neb
@@ -0,0 +1,2 @@
+(> 20 4 5)
+; panic! [1] '>': expected [2] arguments, received 3
diff --git a/tests/math/greaterthan/bad_arity_zero.neb b/tests/math/greaterthan/bad_arity_zero.neb
new file mode 100644
index 0000000..8ca1597
--- /dev/null
+++ b/tests/math/greaterthan/bad_arity_zero.neb
@@ -0,0 +1,2 @@
+(>)
+; panic! [1] '>': expected [2] arguments, received 0
diff --git a/tests/math/greaterthan/bad_type_bool.neb b/tests/math/greaterthan/bad_type_bool.neb
new file mode 100644
index 0000000..2907546
--- /dev/null
+++ b/tests/math/greaterthan/bad_type_bool.neb
@@ -0,0 +1,2 @@
+(> 7.34 #true)
+; panic! [1] '>': received :bool, expected :number (got #true)
diff --git a/tests/math/greaterthan/bad_type_list.neb b/tests/math/greaterthan/bad_type_list.neb
new file mode 100644
index 0000000..f24a46c
--- /dev/null
+++ b/tests/math/greaterthan/bad_type_list.neb
@@ -0,0 +1,2 @@
+(> 4 (list "hello"))
+; panic! [1] '>': received :list, expected :number (got ("hello"))
diff --git a/tests/math/greaterthan/bad_type_string.neb b/tests/math/greaterthan/bad_type_string.neb
new file mode 100644
index 0000000..e1f8e15
--- /dev/null
+++ b/tests/math/greaterthan/bad_type_string.neb
@@ -0,0 +1,2 @@
+(> 3 "hello")
+; panic! [1] '>': received :string, expected :number (got "hello")
diff --git a/tests/math/greaterthan/bad_type_type.neb b/tests/math/greaterthan/bad_type_type.neb
new file mode 100644
index 0000000..3fe2e5b
--- /dev/null
+++ b/tests/math/greaterthan/bad_type_type.neb
@@ -0,0 +1,2 @@
+(> .4 :string)
+; panic! [1] '>': received :type, expected :number (got :string)
diff --git a/tests/math/greaterthan/happy.neb b/tests/math/greaterthan/happy.neb
new file mode 100644
index 0000000..e195b7e
--- /dev/null
+++ b/tests/math/greaterthan/happy.neb
@@ -0,0 +1,9 @@
+(print
+ (concat
+ (->string (> 20 5)) " "
+ (->string (> 3.6 2)) " "
+ (->string (> 1 2.5)) " "
+ (->string (> 5 5)) " "
+ (->string (> 1.1 4.4))))
+
+; #true #true #false #false #false