Changeset: 37af54086db4 for MonetDB
URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=37af54086db4
Added Files:
monetdb5/modules/mal/Tests/rapi01.mal
Modified Files:
monetdb5/modules/mal/Tests/All
Branch: RIntegration
Log Message:
Robustness test
The errors should be recognized and turned into
a proper exception message
diffs (43 lines):
diff --git a/monetdb5/modules/mal/Tests/All b/monetdb5/modules/mal/Tests/All
--- a/monetdb5/modules/mal/Tests/All
+++ b/monetdb5/modules/mal/Tests/All
@@ -66,6 +66,7 @@ mapi07
mapi01
rapi00
+rapi01
cluster00
tokenizer00
diff --git a/monetdb5/modules/mal/Tests/rapi01.mal
b/monetdb5/modules/mal/Tests/rapi01.mal
new file mode 100644
--- /dev/null
+++ b/monetdb5/modules/mal/Tests/rapi01.mal
@@ -0,0 +1,27 @@
+# Error handling tests
+b:= bat.new(:oid,:int);
+bat.append(b,1804289383);
+bat.append(b,846930886);
+bat.append(b,1681692777);
+bat.append(b,1714636915);
+bat.append(b,1957747793);
+bat.append(b,424238335);
+bat.append(b,719885386);
+bat.append(b,1649760492);
+bat.append(b,596516649);
+bat.append(b,1189641421);
+
+io.print(b);
+
+# illegal variables being used
+
+r:bat[:oid,:dbl] := rapi.eval("someresult <- Re(fft(somevalue));",b);
+r:bat[:oid,:dbl] := rapi.eval("someresult <- Re(fft(arg2));",b);
+r:bat[:oid,:dbl] := rapi.eval("ret0 <- Re(fft(somevalue));",b);
+r:bat[:oid,:dbl] := rapi.eval("ret1 <- Re(fft(arg2));",b);
+r:bat[:oid,:dbl] := rapi.eval("ret0 <- Re(fft(arg5));",b);
+
+# illegal R expressions
+r:bat[:oid,:dbl] := rapi.eval("ret0 <- Re(fft(arg2) ) );",b);
+
+io.print(r);
_______________________________________________
checkin-list mailing list
[email protected]
https://www.monetdb.org/mailman/listinfo/checkin-list
