Changeset: 1b48c7a014f8 for MonetDB
URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=1b48c7a014f8
Added Files:
        sql/backends/monet5/Tests/rapi03.sql
Modified Files:
        sql/backends/monet5/Tests/All
Branch: RIntegration
Log Message:

R API: Added selection predicate test (select * from sometable where rfunc(col) 
> 0;


diffs (31 lines):

diff --git a/sql/backends/monet5/Tests/All b/sql/backends/monet5/Tests/All
--- a/sql/backends/monet5/Tests/All
+++ b/sql/backends/monet5/Tests/All
@@ -1,6 +1,9 @@
 optimizers
 
-rapi03
+HAVE_LIBR?rapi00
+HAVE_LIBR?rapi01
+HAVE_LIBR?rapi02
+HAVE_LIBR?rapi03
 
 inlineR
 inlineUDF
diff --git a/sql/backends/monet5/Tests/rapi03.sql 
b/sql/backends/monet5/Tests/rapi03.sql
new file mode 100644
--- /dev/null
+++ b/sql/backends/monet5/Tests/rapi03.sql
@@ -0,0 +1,12 @@
+create table rval(i integer);
+insert into rval values (1),(2),(3),(4),(-1),(0);
+
+create function rapi03(i integer,z integer) returns integer
+language R {
+       return(as.integer(arg1>arg2));
+};
+select * from rval where rapi03(i,2) = 1;
+drop function rapi03;
+drop table rval;
+
+
_______________________________________________
checkin-list mailing list
checkin-list@monetdb.org
https://www.monetdb.org/mailman/listinfo/checkin-list

Reply via email to