Move old tests to old-tests/

3 files changed, 111 insertions, 0 deletions

diff --git a/old-tests/eval/buildfile b/old-tests/eval/buildfile
new file mode 100644
index 0000000..f26a9a0
--- /dev/null
+++ b/old-tests/eval/buildfile
@@ -0,0 +1,72 @@
+(./):
+()
+
+# Invalid.
+#
+#(foo
+#(foo #comment
+
+print ()
+print ((foo)(bar))
+print ((foo)   (bar))
+
+print (foo\
+bar)
+
+# !=, == vs !, = recognition
+#
+print (=)
+print (!)
+print (= foo)
+print (foo!)
+
+# !=, == evaluation
+#
+
+# print (  == bar)
+# print (foo == )
+
+print (foo == bar)
+print (foo == foo)
+print (foo != bar)
+print (foo != foo)
+
+print (foo == (foo))
+print ((foo bar) == foo bar)
+print (foo != foo bar)
+print ("" == '')
+
+print ((foo != bar) baz)
+print "foo equals bar is (foo == bar)"
+
+foo = foo
+print ($foo == foo)
+print (bar != $foo)
+
+print ([null])
+print (([null]))
+print ([uint64] 01)
+
+n = [null]
+print ($n == [null])
+print ($N == [null])
+print ([null] == [null])
+
+print ($n == $N == true)
+
+n =
+print ($n == )
+n = {}
+print ($n == "")
+
+#print ([uint64] 01 == [string] 01)
+
+# <, <=, >, >= evaluation
+#
+print (a < b)
+print (a b > a a)
+print (123 <= 123)
+print ([uint64] 02 > [uint64] 01)
+print (a > [null])
+print ([uint64] 02 > [null])
+print ($build.version > 30000)
diff --git a/old-tests/eval/test.out b/old-tests/eval/test.out
new file mode 100644
index 0000000..555853f
--- /dev/null
+++ b/old-tests/eval/test.out
@@ -0,0 +1,36 @@
+
+foobar
+foo bar
+foobar
+=
+!
+= foo
+foo!
+false
+true
+true
+false
+true
+true
+true
+true
+true baz
+foo equals bar is false
+true
+true
+[null]
+[null]
+1
+true
+true
+true
+true
+true
+true
+true
+true
+true
+true
+true
+true
+true
diff --git a/old-tests/eval/test.sh b/old-tests/eval/test.sh
new file mode 100755
index 0000000..c745b76
--- /dev/null
+++ b/old-tests/eval/test.sh
@@ -0,0 +1,3 @@
+#!/bin/sh
+
+b -q | diff --strip-trailing-cr -u test.out -