Changeset: 23468aae4376 for MonetDB
URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=23468aae4376
Modified Files:
clients/R/MonetDB.R/R/dbi.R
clients/R/Tests/dbi.R
Branch: Oct2014
Log Message:
R Connector: no warnings
Unterschiede (24 Zeilen):
diff --git a/clients/R/MonetDB.R/R/dbi.R b/clients/R/MonetDB.R/R/dbi.R
--- a/clients/R/MonetDB.R/R/dbi.R
+++ b/clients/R/MonetDB.R/R/dbi.R
@@ -102,7 +102,7 @@ setMethod("dbConnect", "MonetDBDriver",
continue <- FALSE
tryCatch ({
# open socket with 5-sec timeout so we can check whether everything
works
- socket <- socket <<- .mapiConnect(host, port, 5)
+ suppressWarnings(socket <- socket <<- .mapiConnect(host, port, 5))
# authenticate
.mapiAuthenticate(socket, dbname, user, password, language=language)
.mapiDisconnect(socket)
diff --git a/clients/R/Tests/dbi.R b/clients/R/Tests/dbi.R
--- a/clients/R/Tests/dbi.R
+++ b/clients/R/Tests/dbi.R
@@ -17,7 +17,7 @@ tname <- "monetdbtest"
drv <- dbDriver("MonetDB")
stopifnot(identical(dbGetInfo(drv)$name,"MonetDBDriver"))
-con <- conn <- dbConnect(drv, port=dbport, dbname=dbname)
+con <- conn <- dbConnect(drv, port=dbport, dbname=dbname, wait=T)
stopifnot(identical(class(con)[[1]],"MonetDBConnection"))
# basic MAPI/SQL test
_______________________________________________
checkin-list mailing list
[email protected]
https://www.monetdb.org/mailman/listinfo/checkin-list
