[Rcpp-commits] r1156 - scripts

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

Author: romain
Date: 2010-05-04 08:25:34 +0200 (Tue, 04 May 2010)
New Revision: 1156

Modified:
   scripts/preprocessor.R
Log:
dont commit before the third cup of coffee 

Modified: scripts/preprocessor.R
===================================================================
--- scripts/preprocessor.R	2010-05-04 06:25:27 UTC (rev 1155)
+++ scripts/preprocessor.R	2010-05-04 06:25:34 UTC (rev 1156)
@@ -8,10 +8,11 @@
 	txt <- sprintf( '
 #define RCPP_FUNCTION_%d(__OUT__,__NAME__%s)        \\
 extern "C" SEXP __NAME__##__rcpp_info__( ){         \\
-    return Rcpp::List(                              \\
+    using Rcpp::_ ;                                 \\
+	return Rcpp::List::create(                      \\
         _["n"]   = %d ,                             \\
         _["out"] = #__OUT__ ,                       \\
-        _["in"]  = CharacterVector::create(         \\
+        _["in"]  = Rcpp::CharacterVector::create(   \\
         	%s                                       \\
         	) ) ;                                    \\
 }                                                   \\