[Rcpp-commits] r702 - pkg/RcppExamples/R

[noreply at r-forge.r-project.org]

Author: edd
Date: 2010-02-16 18:20:32 +0100 (Tue, 16 Feb 2010)
New Revision: 702

Modified:
   pkg/RcppExamples/R/RcppExample.R
Log:
correct package in .Call

Modified: pkg/RcppExamples/R/RcppExample.R
===================================================================
--- pkg/RcppExamples/R/RcppExample.R	2010-02-16 17:15:04 UTC (rev 701)
+++ pkg/RcppExamples/R/RcppExample.R	2010-02-16 17:20:32 UTC (rev 702)
@@ -74,7 +74,7 @@
     ## Finally ready to make the call...
     val <- .Call("Rcpp_Example", params, nlist, numvec, nummat,
                  df, datevec, stringvec, fnvec, fnlist,
-                 PACKAGE="Rcpp"
+                 PACKAGE="RcppExamples"
                  )
 
     ## Define a class for the return value so we can control what gets
@@ -116,7 +116,7 @@
     ## Make the call...
     val <- .Call("RcppParamsExample",
                  params,
-                 PACKAGE="Rcpp")
+                 PACKAGE="RcppExamples")
 
     ## Define a class for the return value so we can control what gets
     ## printed when a variable assigned this value is typed on a line by itself.
@@ -144,7 +144,7 @@
     ## Make the call...
     val <- .Call("RcppDateExample",
                  dv, dtv,
-                 PACKAGE="Rcpp")
+                 PACKAGE="RcppExamples")
 
     ## Define a class for the return value so we can control what gets
     ## printed when a variable assigned this value is typed on a line by itself.