56 files changed, 213 insertions, 0 deletions
diff --git a/systemtest/testdata/parser/gentest.awk b/systemtest/testdata/parser/gentest.awk
new file mode 100644
index 0000000..b743c6c
--- /dev/null
+++ b/systemtest/testdata/parser/gentest.awk
@@ -0,0 +1,29 @@
+#! /bin/gawk -f
+##
+## This AWK-script generates some example queries, when applied on "testcases",
+## as command line argument. When you need to add new test cases, edit the 
+## file "testcases". Each line in this file should be of the form:
+##  
+## filename @ query @ -- comment @ -- comment
+##
+## For example the line:
+##
+## mm.ql @ select 2- -1 from ImgCharA as a @ -- caution: -- introduces comments.
+##
+## should generate a test file named mm.ql with the folowing content:
+##
+## --  caution: -- introduces comments.
+##
+## select 2- -1 from ImgCharA as a
+##
+## The char @ is somewhat unusual for SQL and I chose it as field separator.
+
+BEGIN {FS = "@"} ; 
+
+{ 
+    for (i = 3; i < NF; i++) {
+	printf "%s\n", $i > $1
+    }
+    printf "\n" >> $1
+    printf "%s\n", $2 >> $1
+}
diff --git a/systemtest/testdata/parser/mm_long.ql b/systemtest/testdata/parser/mm_long.ql
new file mode 100644
index 0000000..5f79ee8
--- /dev/null
+++ b/systemtest/testdata/parser/mm_long.ql
@@ -0,0 +1,3 @@
+ -- test unary and binary operators on long. 
+
+ select 2++1 from ImgCharA as i 
diff --git a/systemtest/testdata/parser/mm_long.ql.java.out b/systemtest/testdata/parser/mm_long.ql.java.out
new file mode 100644
index 0000000..dc7b54a
--- /dev/null
+++ b/systemtest/testdata/parser/mm_long.ql.java.out
@@ -0,0 +1 @@
+33
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/mm_long.ql.out b/systemtest/testdata/parser/mm_long.ql.out
new file mode 100644
index 0000000..58af424
--- /dev/null
+++ b/systemtest/testdata/parser/mm_long.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<long>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: 3
+Element 2: 3
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/mp_long.ql b/systemtest/testdata/parser/mp_long.ql
new file mode 100644
index 0000000..0d613de
--- /dev/null
+++ b/systemtest/testdata/parser/mp_long.ql
@@ -0,0 +1,2 @@
+
+ select 2-+1 from ImgCharA as i 
diff --git a/systemtest/testdata/parser/mp_long.ql.java.out b/systemtest/testdata/parser/mp_long.ql.java.out
new file mode 100644
index 0000000..9d60796
--- /dev/null
+++ b/systemtest/testdata/parser/mp_long.ql.java.out
@@ -0,0 +1 @@
+11
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/mp_long.ql.out b/systemtest/testdata/parser/mp_long.ql.out
new file mode 100644
index 0000000..5f11d14
--- /dev/null
+++ b/systemtest/testdata/parser/mp_long.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<long>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: 1
+Element 2: 1
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/nm_long.ql b/systemtest/testdata/parser/nm_long.ql
new file mode 100644
index 0000000..188c6ae
--- /dev/null
+++ b/systemtest/testdata/parser/nm_long.ql
@@ -0,0 +1,2 @@
+
+ select   -0 from ImgCharA as i 
diff --git a/systemtest/testdata/parser/nm_long.ql.java.out b/systemtest/testdata/parser/nm_long.ql.java.out
new file mode 100644
index 0000000..857f065
--- /dev/null
+++ b/systemtest/testdata/parser/nm_long.ql.java.out
@@ -0,0 +1 @@
+00
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/nm_long.ql.out b/systemtest/testdata/parser/nm_long.ql.out
new file mode 100644
index 0000000..0b8f0e4
--- /dev/null
+++ b/systemtest/testdata/parser/nm_long.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<long>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: 0
+Element 2: 0
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/nn_long.ql b/systemtest/testdata/parser/nn_long.ql
new file mode 100644
index 0000000..c3b31a6
--- /dev/null
+++ b/systemtest/testdata/parser/nn_long.ql
@@ -0,0 +1,2 @@
+
+ select    0 from ImgCharA as i 
diff --git a/systemtest/testdata/parser/nn_long.ql.java.out b/systemtest/testdata/parser/nn_long.ql.java.out
new file mode 100644
index 0000000..857f065
--- /dev/null
+++ b/systemtest/testdata/parser/nn_long.ql.java.out
@@ -0,0 +1 @@
+00
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/nn_long.ql.out b/systemtest/testdata/parser/nn_long.ql.out
new file mode 100644
index 0000000..0b8f0e4
--- /dev/null
+++ b/systemtest/testdata/parser/nn_long.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<long>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: 0
+Element 2: 0
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/np_long.ql b/systemtest/testdata/parser/np_long.ql
new file mode 100644
index 0000000..819cdf4
--- /dev/null
+++ b/systemtest/testdata/parser/np_long.ql
@@ -0,0 +1,2 @@
+
+ select   +0 from ImgCharA as i 
diff --git a/systemtest/testdata/parser/np_long.ql.java.out b/systemtest/testdata/parser/np_long.ql.java.out
new file mode 100644
index 0000000..857f065
--- /dev/null
+++ b/systemtest/testdata/parser/np_long.ql.java.out
@@ -0,0 +1 @@
+00
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/np_long.ql.out b/systemtest/testdata/parser/np_long.ql.out
new file mode 100644
index 0000000..0b8f0e4
--- /dev/null
+++ b/systemtest/testdata/parser/np_long.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<long>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: 0
+Element 2: 0
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/om_long.ql b/systemtest/testdata/parser/om_long.ql
new file mode 100644
index 0000000..2e65dfa
--- /dev/null
+++ b/systemtest/testdata/parser/om_long.ql
@@ -0,0 +1,2 @@
+
+ select   -1 from ImgCharA as i 
diff --git a/systemtest/testdata/parser/om_long.ql.java.out b/systemtest/testdata/parser/om_long.ql.java.out
new file mode 100644
index 0000000..c92a447
--- /dev/null
+++ b/systemtest/testdata/parser/om_long.ql.java.out
@@ -0,0 +1 @@
+-1-1
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/om_long.ql.out b/systemtest/testdata/parser/om_long.ql.out
new file mode 100644
index 0000000..08b0f64
--- /dev/null
+++ b/systemtest/testdata/parser/om_long.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<long>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: -1
+Element 2: -1
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/on_long.ql b/systemtest/testdata/parser/on_long.ql
new file mode 100644
index 0000000..dd16912
--- /dev/null
+++ b/systemtest/testdata/parser/on_long.ql
@@ -0,0 +1,2 @@
+
+ select    1 from ImgCharA as i 
diff --git a/systemtest/testdata/parser/on_long.ql.java.out b/systemtest/testdata/parser/on_long.ql.java.out
new file mode 100644
index 0000000..9d60796
--- /dev/null
+++ b/systemtest/testdata/parser/on_long.ql.java.out
@@ -0,0 +1 @@
+11
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/on_long.ql.out b/systemtest/testdata/parser/on_long.ql.out
new file mode 100644
index 0000000..5f11d14
--- /dev/null
+++ b/systemtest/testdata/parser/on_long.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<long>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: 1
+Element 2: 1
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/op_long.ql b/systemtest/testdata/parser/op_long.ql
new file mode 100644
index 0000000..0dab606
--- /dev/null
+++ b/systemtest/testdata/parser/op_long.ql
@@ -0,0 +1,2 @@
+
+ select   +1 from ImgCharA as i 
diff --git a/systemtest/testdata/parser/op_long.ql.java.out b/systemtest/testdata/parser/op_long.ql.java.out
new file mode 100644
index 0000000..9d60796
--- /dev/null
+++ b/systemtest/testdata/parser/op_long.ql.java.out
@@ -0,0 +1 @@
+11
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/op_long.ql.out b/systemtest/testdata/parser/op_long.ql.out
new file mode 100644
index 0000000..5f11d14
--- /dev/null
+++ b/systemtest/testdata/parser/op_long.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<long>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: 1
+Element 2: 1
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/p1_long.ql b/systemtest/testdata/parser/p1_long.ql
new file mode 100644
index 0000000..55915d7
--- /dev/null
+++ b/systemtest/testdata/parser/p1_long.ql
@@ -0,0 +1,2 @@
+
+ select  2+1 from ImgCharA as i 
diff --git a/systemtest/testdata/parser/p1_long.ql.java.out b/systemtest/testdata/parser/p1_long.ql.java.out
new file mode 100644
index 0000000..dc7b54a
--- /dev/null
+++ b/systemtest/testdata/parser/p1_long.ql.java.out
@@ -0,0 +1 @@
+33
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/p1_long.ql.out b/systemtest/testdata/parser/p1_long.ql.out
new file mode 100644
index 0000000..58af424
--- /dev/null
+++ b/systemtest/testdata/parser/p1_long.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<long>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: 3
+Element 2: 3
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/p2_long.ql b/systemtest/testdata/parser/p2_long.ql
new file mode 100644
index 0000000..b3581cd
--- /dev/null
+++ b/systemtest/testdata/parser/p2_long.ql
@@ -0,0 +1,2 @@
+
+ select -2+1 from ImgCharA as i 
diff --git a/systemtest/testdata/parser/p2_long.ql.java.out b/systemtest/testdata/parser/p2_long.ql.java.out
new file mode 100644
index 0000000..c92a447
--- /dev/null
+++ b/systemtest/testdata/parser/p2_long.ql.java.out
@@ -0,0 +1 @@
+-1-1
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/p2_long.ql.out b/systemtest/testdata/parser/p2_long.ql.out
new file mode 100644
index 0000000..08b0f64
--- /dev/null
+++ b/systemtest/testdata/parser/p2_long.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<long>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: -1
+Element 2: -1
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/pm_long.ql b/systemtest/testdata/parser/pm_long.ql
new file mode 100644
index 0000000..ee67e1c
--- /dev/null
+++ b/systemtest/testdata/parser/pm_long.ql
@@ -0,0 +1,2 @@
+
+ select 2+-1 from ImgCharA as i 
diff --git a/systemtest/testdata/parser/pm_long.ql.java.out b/systemtest/testdata/parser/pm_long.ql.java.out
new file mode 100644
index 0000000..9d60796
--- /dev/null
+++ b/systemtest/testdata/parser/pm_long.ql.java.out
@@ -0,0 +1 @@
+11
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/pm_long.ql.out b/systemtest/testdata/parser/pm_long.ql.out
new file mode 100644
index 0000000..5f11d14
--- /dev/null
+++ b/systemtest/testdata/parser/pm_long.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<long>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: 1
+Element 2: 1
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/pp_long.ql b/systemtest/testdata/parser/pp_long.ql
new file mode 100644
index 0000000..98cf8b0
--- /dev/null
+++ b/systemtest/testdata/parser/pp_long.ql
@@ -0,0 +1,2 @@
+
+ select 2++1 from ImgCharA as i 
diff --git a/systemtest/testdata/parser/pp_long.ql.java.out b/systemtest/testdata/parser/pp_long.ql.java.out
new file mode 100644
index 0000000..dc7b54a
--- /dev/null
+++ b/systemtest/testdata/parser/pp_long.ql.java.out
@@ -0,0 +1 @@
+33
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/pp_long.ql.out b/systemtest/testdata/parser/pp_long.ql.out
new file mode 100644
index 0000000..58af424
--- /dev/null
+++ b/systemtest/testdata/parser/pp_long.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<long>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: 3
+Element 2: 3
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/sqrt_1.ql b/systemtest/testdata/parser/sqrt_1.ql
new file mode 100644
index 0000000..205e344
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_1.ql
@@ -0,0 +1,2 @@
+
+  select sqrt(2.0d) from ImgCharA as i 
diff --git a/systemtest/testdata/parser/sqrt_1.ql.java.out b/systemtest/testdata/parser/sqrt_1.ql.java.out
new file mode 100644
index 0000000..27ceb54
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_1.ql.java.out
@@ -0,0 +1 @@
+1.41421356237309511.4142135623730951
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/sqrt_1.ql.out b/systemtest/testdata/parser/sqrt_1.ql.out
new file mode 100644
index 0000000..a23dbb9
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_1.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<double>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: 1.41421
+Element 2: 1.41421
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/sqrt_2.ql b/systemtest/testdata/parser/sqrt_2.ql
new file mode 100644
index 0000000..6cf337a
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_2.ql
@@ -0,0 +1,2 @@
+
+  select sqrt(1.0d + 2.0d) from ImgCharA as i 
diff --git a/systemtest/testdata/parser/sqrt_2.ql.java.out b/systemtest/testdata/parser/sqrt_2.ql.java.out
new file mode 100644
index 0000000..6367268
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_2.ql.java.out
@@ -0,0 +1 @@
+1.73205080756887721.7320508075688772
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/sqrt_2.ql.out b/systemtest/testdata/parser/sqrt_2.ql.out
new file mode 100644
index 0000000..7c1432a
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_2.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<double>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: 1.73205
+Element 2: 1.73205
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/sqrt_3.ql b/systemtest/testdata/parser/sqrt_3.ql
new file mode 100644
index 0000000..f8f97d8
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_3.ql
@@ -0,0 +1,2 @@
+
+  select sqrt(sqrt(4.0d)) from ImgCharA as i 
diff --git a/systemtest/testdata/parser/sqrt_3.ql.java.out b/systemtest/testdata/parser/sqrt_3.ql.java.out
new file mode 100644
index 0000000..27ceb54
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_3.ql.java.out
@@ -0,0 +1 @@
+1.41421356237309511.4142135623730951
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/sqrt_3.ql.out b/systemtest/testdata/parser/sqrt_3.ql.out
new file mode 100644
index 0000000..a23dbb9
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_3.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<double>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: 1.41421
+Element 2: 1.41421
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/sqrt_4.ql b/systemtest/testdata/parser/sqrt_4.ql
new file mode 100644
index 0000000..3eb8806
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_4.ql
@@ -0,0 +1,2 @@
+
+  select sqrt(0.0d) from ImgCharA as i 
diff --git a/systemtest/testdata/parser/sqrt_4.ql.java.out b/systemtest/testdata/parser/sqrt_4.ql.java.out
new file mode 100644
index 0000000..b2024e1
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_4.ql.java.out
@@ -0,0 +1 @@
+0.00.0
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/sqrt_4.ql.out b/systemtest/testdata/parser/sqrt_4.ql.out
new file mode 100644
index 0000000..eb05dc2
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_4.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<double>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: 0
+Element 2: 0
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/sqrt_5.ql b/systemtest/testdata/parser/sqrt_5.ql
new file mode 100644
index 0000000..a3a6f82
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_5.ql
@@ -0,0 +1,2 @@
+
+  select 1.0d + sqrt(2.0d) from ImgCharA as i 
diff --git a/systemtest/testdata/parser/sqrt_5.ql.java.out b/systemtest/testdata/parser/sqrt_5.ql.java.out
new file mode 100644
index 0000000..785bccc
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_5.ql.java.out
@@ -0,0 +1 @@
+2.4142135623730952.414213562373095
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/sqrt_5.ql.out b/systemtest/testdata/parser/sqrt_5.ql.out
new file mode 100644
index 0000000..9a7b7d3
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_5.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<double>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: 2.41421
+Element 2: 2.41421
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/sqrt_6.ql b/systemtest/testdata/parser/sqrt_6.ql
new file mode 100644
index 0000000..ba6cb0d
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_6.ql
@@ -0,0 +1,2 @@
+
+  select sqrt(2.0d) - 1.0d from ImgCharA as i 
diff --git a/systemtest/testdata/parser/sqrt_6.ql.java.out b/systemtest/testdata/parser/sqrt_6.ql.java.out
new file mode 100644
index 0000000..eb428b9
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_6.ql.java.out
@@ -0,0 +1 @@
+0.414213562373095150.41421356237309515
+\ No newline at end of file
diff --git a/systemtest/testdata/parser/sqrt_6.ql.out b/systemtest/testdata/parser/sqrt_6.ql.out
new file mode 100644
index 0000000..0851541
--- /dev/null
+++ b/systemtest/testdata/parser/sqrt_6.ql.out
@@ -0,0 +1,6 @@
+-- Testbed line: result_type=set<double>
+-- Testbed line: result_elements=2
+-- Testbed start block:
+Element 1: 0.414214
+Element 2: 0.414214
+-- Testbed end block:
diff --git a/systemtest/testdata/parser/testcases b/systemtest/testdata/parser/testcases
new file mode 100644
index 0000000..be7e51a
--- /dev/null
+++ b/systemtest/testdata/parser/testcases
@@ -0,0 +1,21 @@
+pp_long.ql@ select 2++1 from ImgCharA as i @ -- test unary and binary operators on long.
+pm_long.ql@ select 2+-1 from ImgCharA as i @ -- test unary and binary operators on long.
+mp_long.ql@ select 2-+1 from ImgCharA as i @ -- test unary and binary operators on long.
+mm_long.ql@ select 2++1 from ImgCharA as i @ -- test unary and binary operators on long. @ -- Caution: don't use -- as it introduces comments.
+nn_long.ql@ select    0 from ImgCharA as i @ -- test long zero.
+np_long.ql@ select   +0 from ImgCharA as i @ -- test long zero.
+nm_long.ql@ select   -0 from ImgCharA as i @ -- test long zero.
+on_long.ql@ select    1 from ImgCharA as i @ -- test long one.
+op_long.ql@ select   +1 from ImgCharA as i @ -- test long one.
+om_long.ql@ select   -1 from ImgCharA as i @ -- test long one.
+p1_long.ql@ select  2+1 from ImgCharA as i @ -- test basic arithmetic.
+p2_long.ql@ select -2+1 from ImgCharA as i @ -- test basic arithmetic.
+m1_long.ql@ select  2-1 from ImgCharA as i @ -- test basic arithmetic.
+m2_long.ql@ select -2-1 from ImgCharA as i @ -- test basic arithmetic.
+sqrt_1.ql@  select sqrt(2.0d) from ImgCharA as i @ -- test square root.
+sqrt_2.ql@  select sqrt(1.0d + 2.0d) from ImgCharA as i @ -- test square root.
+sqrt_3.ql@  select sqrt(sqrt(4.0d)) from ImgCharA as i @ -- test square root.
+sqrt_4.ql@  select sqrt(0.0d) from ImgCharA as i @ -- test square root.
+sqrt_5.ql@  select 1.0d + sqrt(2.0d) from ImgCharA as i @ -- test square root.
+sqrt_6.ql@  select sqrt(2.0d) - 1.0d from ImgCharA as i @ -- test square root.
+sqrt_nan.ql@ select sqrt(-10.0d) from ImgCharA as i @ -- negative argument leads to NaN.
+\ No newline at end of file