Changeset: 4af20ab7f85a for MonetDB
URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=4af20ab7f85a
Added Files:
        monetdb5/modules/kernel/Tests/batstr.mal
        monetdb5/modules/kernel/Tests/batstr.stable.err
        monetdb5/modules/kernel/Tests/batstr.stable.out
Modified Files:
        monetdb5/modules/kernel/Tests/All
Branch: Oct2012
Log Message:

m5: add simple test for batstr.string


diffs (128 lines):

diff --git a/monetdb5/modules/kernel/Tests/All 
b/monetdb5/modules/kernel/Tests/All
--- a/monetdb5/modules/kernel/Tests/All
+++ b/monetdb5/modules/kernel/Tests/All
@@ -1,3 +1,4 @@
 time01
 TriBool
 vacuum
+batstr
diff --git a/monetdb5/modules/kernel/Tests/batstr.mal 
b/monetdb5/modules/kernel/Tests/batstr.mal
new file mode 100644
--- /dev/null
+++ b/monetdb5/modules/kernel/Tests/batstr.mal
@@ -0,0 +1,14 @@
+t := bat.new(:oid,:str);
+t := bat.insert(t, 0@0, "0123456789");
+
+x1 := batstr.string(t, 0);
+x2 := batstr.string(t, 3);
+x3 := batstr.string(t, 9);
+x4 := batstr.string(t, 12);
+x5 := batstr.string(t, -6);
+
+io.print(x1);
+io.print(x2);
+io.print(x3);
+io.print(x4);
+io.print(x5);
diff --git a/monetdb5/modules/kernel/Tests/batstr.stable.err 
b/monetdb5/modules/kernel/Tests/batstr.stable.err
new file mode 100644
--- /dev/null
+++ b/monetdb5/modules/kernel/Tests/batstr.stable.err
@@ -0,0 +1,30 @@
+stderr of test 'batstr` in directory 'modules/kernel` itself:
+
+
+# 16:13:40 >  
+# 16:13:40 >  "mserver5" "--debug=10" "--set" "gdk_nr_threads=0" "--set" 
"gdk_dbfarm=/Volumes/Scratch/MonetDB/Oct2012/mtest-Phoebe.lan/five/dbfarm" 
"--set" "mapi_open=true" "--set" "mapi_port=32843" "--set" "monet_prompt=" 
"--trace" "--forcemito" "--set" "mal_listing=2" 
"--dbname=mTests_modules_kernel" "batstr.mal"
+# 16:13:40 >  
+
+# builtin opt  gdk_dbname = demo
+# builtin opt  gdk_dbfarm = 
/Volumes/Scratch/MonetDB/Oct2012/program-i386/var/lib/monetdb5/dbfarm
+# builtin opt  gdk_debug = 0
+# builtin opt  gdk_vmtrim = yes
+# builtin opt  monet_prompt = >
+# builtin opt  monet_daemon = no
+# builtin opt  mapi_port = 50000
+# builtin opt  mapi_open = false
+# builtin opt  mapi_autosense = false
+# builtin opt  sql_optimizer = default_pipe
+# builtin opt  sql_debug = 0
+# cmdline opt  gdk_nr_threads = 0
+# cmdline opt  gdk_dbfarm = 
/Volumes/Scratch/MonetDB/Oct2012/mtest-Phoebe.lan/five/dbfarm
+# cmdline opt  mapi_open = true
+# cmdline opt  mapi_port = 32843
+# cmdline opt  monet_prompt = 
+# cmdline opt  mal_listing = 2
+# cmdline opt  gdk_dbname = mTests_modules_kernel
+
+# 16:13:40 >  
+# 16:13:40 >  "Done."
+# 16:13:40 >  
+
diff --git a/monetdb5/modules/kernel/Tests/batstr.stable.out 
b/monetdb5/modules/kernel/Tests/batstr.stable.out
new file mode 100644
--- /dev/null
+++ b/monetdb5/modules/kernel/Tests/batstr.stable.out
@@ -0,0 +1,61 @@
+stdout of test 'batstr` in directory 'modules/kernel` itself:
+
+
+# 16:13:40 >  
+# 16:13:40 >  "mserver5" "--debug=10" "--set" "gdk_nr_threads=0" "--set" 
"gdk_dbfarm=/Volumes/Scratch/MonetDB/Oct2012/mtest-Phoebe.lan/five/dbfarm" 
"--set" "mapi_open=true" "--set" "mapi_port=32843" "--set" "monet_prompt=" 
"--trace" "--forcemito" "--set" "mal_listing=2" 
"--dbname=mTests_modules_kernel" "batstr.mal"
+# 16:13:40 >  
+
+# MonetDB 5 server v11.13.2 "Oct2012-08b31d1252ae"
+# Serving database 'mTests_modules_kernel', using 2 threads
+# Compiled for i686-apple-darwin9/32bit with 32bit OIDs dynamically linked
+# Found 2.000 GiB available main-memory.
+# Copyright (c) 1993-July 2008 CWI.
+# Copyright (c) August 2008-2012 MonetDB B.V., all rights reserved
+# Visit http://www.monetdb.org/ for further information
+# Listening for connection requests on mapi:monetdb://Phoebe.lan:32843/
+# MonetDB/JAQL module loaded
+# MonetDB/SQL module loaded
+function user.main():void;
+    t := bat.new(:oid,:str);
+    t := bat.insert(t,0@0,"0123456789");
+    x1 := batstr.string(t,0);
+    x2 := batstr.string(t,3);
+    x3 := batstr.string(t,9);
+    x4 := batstr.string(t,12);
+    x5 := batstr.string(t,-6);
+    io.print(x1);
+    io.print(x2);
+    io.print(x3);
+    io.print(x4);
+    io.print(x5);
+end main;
+#-------------------------#
+# h    t                 # name
+# void str               # type
+#-------------------------#
+[ 0@0,   "0123456789"    ]
+#-------------------------#
+# h    t                 # name
+# void str               # type
+#-------------------------#
+[ 0@0,   "3456789"       ]
+#-----------------#
+# h    t         # name
+# void str       # type
+#-----------------#
+[ 0@0,   "9"     ]
+#-----------------#
+# h    t         # name
+# void str       # type
+#-----------------#
+[ 0@0,   ""      ]
+#-------------------------#
+# h    t                 # name
+# void str               # type
+#-------------------------#
+[ 0@0,   "456789"        ]
+
+# 16:13:40 >  
+# 16:13:40 >  "Done."
+# 16:13:40 >  
+
_______________________________________________
checkin-list mailing list
[email protected]
http://mail.monetdb.org/mailman/listinfo/checkin-list

Reply via email to