[Rcpp-commits] r673 - pkg/src/Rcpp

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

Author: romain
Date: 2010-02-14 13:54:39 +0100 (Sun, 14 Feb 2010)
New Revision: 673

Modified:
   pkg/src/Rcpp/Language.h
Log:
allow specification of the output type as a template parameter of unary_call (default to SEXP), using implicit as

Modified: pkg/src/Rcpp/Language.h
===================================================================
--- pkg/src/Rcpp/Language.h	2010-02-14 12:53:52 UTC (rev 672)
+++ pkg/src/Rcpp/Language.h	2010-02-14 12:54:39 UTC (rev 673)
@@ -168,7 +168,7 @@
 };
 
 template <typename T, typename OUT = SEXP>
-class unary_call : public std::unary_function<T,SEXP> {
+class unary_call : public std::unary_function<T,OUT> {
 public:
 	unary_call( Language call_ ) : call(call_), proxy(call,1) {}
 	unary_call( Language call_, int index ) : call(call_), proxy(call_,index){}