[Rcpp-commits] r3820 - in pkg/Rcpp: . inst/include/Rcpp/module
noreply at r-forge.r-project.org
noreply at r-forge.r-project.org
Tue Oct 23 16:39:05 CEST 2012
Author: romain
Date: 2012-10-23 16:39:05 +0200 (Tue, 23 Oct 2012)
New Revision: 3820
Modified:
pkg/Rcpp/ChangeLog
pkg/Rcpp/inst/include/Rcpp/module/Module_generated_Pointer_CppMethod.h
Log:
using module_wrap
Modified: pkg/Rcpp/ChangeLog
===================================================================
--- pkg/Rcpp/ChangeLog 2012-10-23 14:38:17 UTC (rev 3819)
+++ pkg/Rcpp/ChangeLog 2012-10-23 14:39:05 UTC (rev 3820)
@@ -3,6 +3,8 @@
* include/Rcpp/internal/wrap.h: new function module_wrap used internally by modules
* include/Rcpp/module/Module_generated_CppMethod.h: using module_wrap and
simplified the code (removing 35% of the generated code now rendered useless)
+ * include/Rcpp/module/Module_generated_PointerCppMethod.h: using module_wrap and
+ simplified the code
2012-10-22 Romain Francois <romain at r-enthusiasts.com>
Modified: pkg/Rcpp/inst/include/Rcpp/module/Module_generated_Pointer_CppMethod.h
===================================================================
--- pkg/Rcpp/inst/include/Rcpp/module/Module_generated_Pointer_CppMethod.h 2012-10-23 14:38:17 UTC (rev 3819)
+++ pkg/Rcpp/inst/include/Rcpp/module/Module_generated_Pointer_CppMethod.h 2012-10-23 14:39:05 UTC (rev 3820)
@@ -2,7 +2,7 @@
//
// Module_generated_CppMethod.h: Rcpp R/C++ interface class library -- Rcpp modules
//
-// Copyright (C) 2010 - 2011 Doug Bates, Dirk Eddelbuettel and Romain Francois
+// Copyright (C) 2010-2012 Doug Bates, Dirk Eddelbuettel and Romain Francois
//
// This file is part of Rcpp.
//
@@ -29,7 +29,7 @@
typedef CppMethod<Class> method_class ;
Pointer_CppMethod0( Method m) : method_class(), met(m){}
SEXP operator()( Class* object, SEXP* ){
- return Rcpp::wrap( met(object) ) ;
+ return Rcpp::module_wrap<Class,OUT>( met(object) ) ;
}
inline int nargs(){ return 0 ; }
inline bool is_void(){ return false ; }
@@ -58,9 +58,49 @@
private:
Method met ;
} ;
+
+
+
+
+ template <typename Class, typename OUT> class Const_Pointer_CppMethod0 : public CppMethod<Class> {
+ public:
+ typedef OUT (*Method)(const Class*) ;
+ typedef CppMethod<Class> method_class ;
+ Const_Pointer_CppMethod0( Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* ){
+ return Rcpp::module_wrap<Class,OUT>( met(object) ) ;
+ }
+ inline int nargs(){ return 0 ; }
+ inline bool is_void(){ return false ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<OUT>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
+ template <typename Class> class Const_Pointer_CppMethod0<Class,void> : public CppMethod<Class> {
+ public:
+ typedef void (*Method)(const Class*) ;
+ typedef CppMethod<Class> method_class ;
+ Const_Pointer_CppMethod0( Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* ){
+ met( object ) ;
+ return R_NilValue ;
+ }
+ inline int nargs(){ return 0 ; }
+ inline bool is_void(){ return true ; }
+ inline bool is_const(){ return true ; }
+
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<void_type>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
+
-
template < typename Class, typename OUT, typename U0 > class Pointer_CppMethod1 : public CppMethod<Class> {
public:
typedef OUT (*Method)(Class*, U0 u0) ;
@@ -68,7 +108,7 @@
Pointer_CppMethod1(Method m) : method_class(), met(m){}
SEXP operator()( Class* object, SEXP* args){
- return Rcpp::wrap( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ) ) ) ;
+ return Rcpp::module_wrap<Class,OUT>( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ) ) ) ;
}
inline int nargs(){ return 1 ; }
inline bool is_void(){ return false ; }
@@ -98,10 +138,50 @@
Method met ;
} ;
+
+ // const
+
+ template < typename Class, typename OUT, typename U0 > class Const_Pointer_CppMethod1 : public CppMethod<Class> {
+ public:
+ typedef OUT (*Method)(const Class*, U0 u0) ;
+ typedef CppMethod<Class> method_class ;
+
+ Const_Pointer_CppMethod1(Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* args){
+ return Rcpp::module_wrap<Class,OUT>( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ) ) ) ;
+ }
+ inline int nargs(){ return 1 ; }
+ inline bool is_void(){ return false ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<OUT,U0>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
+ template < typename Class, typename U0 > class Const_Pointer_CppMethod1<Class,void,U0> : public CppMethod<Class> {
+ public:
+ typedef void (*Method)(const Class*, U0 u0) ;
+ typedef CppMethod<Class> method_class ;
+
+ Const_Pointer_CppMethod1( Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* args){
+ met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ) ) ;
+ return R_NilValue ;
+ }
+ inline int nargs(){ return 1 ; }
+ inline bool is_void(){ return true ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<void_type,U0>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
template < typename Class, typename OUT, typename U0, typename U1 > class Pointer_CppMethod2 : public CppMethod<Class> {
public:
typedef OUT (*Method)(Class*, U0 u0, U1 u1) ;
@@ -109,7 +189,7 @@
Pointer_CppMethod2(Method m) : method_class(), met(m){}
SEXP operator()( Class* object, SEXP* args){
- return Rcpp::wrap( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ) ) ) ;
+ return Rcpp::module_wrap<Class,OUT>( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ) ) ) ;
}
inline int nargs(){ return 2 ; }
inline bool is_void(){ return false ; }
@@ -139,10 +219,50 @@
Method met ;
} ;
+
+ // const
+
+ template < typename Class, typename OUT, typename U0, typename U1 > class Const_Pointer_CppMethod2 : public CppMethod<Class> {
+ public:
+ typedef OUT (*Method)(const Class*, U0 u0, U1 u1) ;
+ typedef CppMethod<Class> method_class ;
+
+ Const_Pointer_CppMethod2(Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* args){
+ return Rcpp::module_wrap<Class,OUT>( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ) ) ) ;
+ }
+ inline int nargs(){ return 2 ; }
+ inline bool is_void(){ return false ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<OUT,U0, U1>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
+ template < typename Class, typename U0, typename U1 > class Const_Pointer_CppMethod2<Class,void,U0, U1> : public CppMethod<Class> {
+ public:
+ typedef void (*Method)(const Class*, U0 u0, U1 u1) ;
+ typedef CppMethod<Class> method_class ;
+
+ Const_Pointer_CppMethod2( Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* args){
+ met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ) ) ;
+ return R_NilValue ;
+ }
+ inline int nargs(){ return 2 ; }
+ inline bool is_void(){ return true ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<void_type,U0, U1>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
template < typename Class, typename OUT, typename U0, typename U1, typename U2 > class Pointer_CppMethod3 : public CppMethod<Class> {
public:
typedef OUT (*Method)(Class*, U0 u0, U1 u1, U2 u2) ;
@@ -150,7 +270,7 @@
Pointer_CppMethod3(Method m) : method_class(), met(m){}
SEXP operator()( Class* object, SEXP* args){
- return Rcpp::wrap( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ) ) ) ;
+ return Rcpp::module_wrap<Class,OUT>( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ) ) ) ;
}
inline int nargs(){ return 3 ; }
inline bool is_void(){ return false ; }
@@ -180,10 +300,50 @@
Method met ;
} ;
+
+ // const
+
+ template < typename Class, typename OUT, typename U0, typename U1, typename U2 > class Const_Pointer_CppMethod3 : public CppMethod<Class> {
+ public:
+ typedef OUT (*Method)(const Class*, U0 u0, U1 u1, U2 u2) ;
+ typedef CppMethod<Class> method_class ;
+
+ Const_Pointer_CppMethod3(Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* args){
+ return Rcpp::module_wrap<Class,OUT>( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ) ) ) ;
+ }
+ inline int nargs(){ return 3 ; }
+ inline bool is_void(){ return false ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<OUT,U0, U1, U2>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
+ template < typename Class, typename U0, typename U1, typename U2 > class Const_Pointer_CppMethod3<Class,void,U0, U1, U2> : public CppMethod<Class> {
+ public:
+ typedef void (*Method)(const Class*, U0 u0, U1 u1, U2 u2) ;
+ typedef CppMethod<Class> method_class ;
+
+ Const_Pointer_CppMethod3( Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* args){
+ met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ) ) ;
+ return R_NilValue ;
+ }
+ inline int nargs(){ return 3 ; }
+ inline bool is_void(){ return true ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<void_type,U0, U1, U2>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
template < typename Class, typename OUT, typename U0, typename U1, typename U2, typename U3 > class Pointer_CppMethod4 : public CppMethod<Class> {
public:
typedef OUT (*Method)(Class*, U0 u0, U1 u1, U2 u2, U3 u3) ;
@@ -191,7 +351,7 @@
Pointer_CppMethod4(Method m) : method_class(), met(m){}
SEXP operator()( Class* object, SEXP* args){
- return Rcpp::wrap( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ) ) ) ;
+ return Rcpp::module_wrap<Class,OUT>( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ) ) ) ;
}
inline int nargs(){ return 4 ; }
inline bool is_void(){ return false ; }
@@ -221,10 +381,50 @@
Method met ;
} ;
+
+ // const
+
+ template < typename Class, typename OUT, typename U0, typename U1, typename U2, typename U3 > class Const_Pointer_CppMethod4 : public CppMethod<Class> {
+ public:
+ typedef OUT (*Method)(const Class*, U0 u0, U1 u1, U2 u2, U3 u3) ;
+ typedef CppMethod<Class> method_class ;
+
+ Const_Pointer_CppMethod4(Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* args){
+ return Rcpp::module_wrap<Class,OUT>( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ) ) ) ;
+ }
+ inline int nargs(){ return 4 ; }
+ inline bool is_void(){ return false ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<OUT,U0, U1, U2, U3>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
+ template < typename Class, typename U0, typename U1, typename U2, typename U3 > class Const_Pointer_CppMethod4<Class,void,U0, U1, U2, U3> : public CppMethod<Class> {
+ public:
+ typedef void (*Method)(const Class*, U0 u0, U1 u1, U2 u2, U3 u3) ;
+ typedef CppMethod<Class> method_class ;
+
+ Const_Pointer_CppMethod4( Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* args){
+ met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ) ) ;
+ return R_NilValue ;
+ }
+ inline int nargs(){ return 4 ; }
+ inline bool is_void(){ return true ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<void_type,U0, U1, U2, U3>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
template < typename Class, typename OUT, typename U0, typename U1, typename U2, typename U3, typename U4 > class Pointer_CppMethod5 : public CppMethod<Class> {
public:
typedef OUT (*Method)(Class*, U0 u0, U1 u1, U2 u2, U3 u3, U4 u4) ;
@@ -232,7 +432,7 @@
Pointer_CppMethod5(Method m) : method_class(), met(m){}
SEXP operator()( Class* object, SEXP* args){
- return Rcpp::wrap( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U4 >::type >( args[4] ) ) ) ;
+ return Rcpp::module_wrap<Class,OUT>( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U4 >::type >( args[4] ) ) ) ;
}
inline int nargs(){ return 5 ; }
inline bool is_void(){ return false ; }
@@ -262,10 +462,50 @@
Method met ;
} ;
+
+ // const
+
+ template < typename Class, typename OUT, typename U0, typename U1, typename U2, typename U3, typename U4 > class Const_Pointer_CppMethod5 : public CppMethod<Class> {
+ public:
+ typedef OUT (*Method)(const Class*, U0 u0, U1 u1, U2 u2, U3 u3, U4 u4) ;
+ typedef CppMethod<Class> method_class ;
+
+ Const_Pointer_CppMethod5(Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* args){
+ return Rcpp::module_wrap<Class,OUT>( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U4 >::type >( args[4] ) ) ) ;
+ }
+ inline int nargs(){ return 5 ; }
+ inline bool is_void(){ return false ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<OUT,U0, U1, U2, U3, U4>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
+ template < typename Class, typename U0, typename U1, typename U2, typename U3, typename U4 > class Const_Pointer_CppMethod5<Class,void,U0, U1, U2, U3, U4> : public CppMethod<Class> {
+ public:
+ typedef void (*Method)(const Class*, U0 u0, U1 u1, U2 u2, U3 u3, U4 u4) ;
+ typedef CppMethod<Class> method_class ;
+
+ Const_Pointer_CppMethod5( Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* args){
+ met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U4 >::type >( args[4] ) ) ;
+ return R_NilValue ;
+ }
+ inline int nargs(){ return 5 ; }
+ inline bool is_void(){ return true ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<void_type,U0, U1, U2, U3, U4>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
template < typename Class, typename OUT, typename U0, typename U1, typename U2, typename U3, typename U4, typename U5 > class Pointer_CppMethod6 : public CppMethod<Class> {
public:
typedef OUT (*Method)(Class*, U0 u0, U1 u1, U2 u2, U3 u3, U4 u4, U5 u5) ;
@@ -273,7 +513,7 @@
Pointer_CppMethod6(Method m) : method_class(), met(m){}
SEXP operator()( Class* object, SEXP* args){
- return Rcpp::wrap( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U4 >::type >( args[4] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U5 >::type >( args[5] ) ) ) ;
+ return Rcpp::module_wrap<Class,OUT>( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U4 >::type >( args[4] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U5 >::type >( args[5] ) ) ) ;
}
inline int nargs(){ return 6 ; }
inline bool is_void(){ return false ; }
@@ -303,10 +543,50 @@
Method met ;
} ;
+
+ // const
+
+ template < typename Class, typename OUT, typename U0, typename U1, typename U2, typename U3, typename U4, typename U5 > class Const_Pointer_CppMethod6 : public CppMethod<Class> {
+ public:
+ typedef OUT (*Method)(const Class*, U0 u0, U1 u1, U2 u2, U3 u3, U4 u4, U5 u5) ;
+ typedef CppMethod<Class> method_class ;
+
+ Const_Pointer_CppMethod6(Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* args){
+ return Rcpp::module_wrap<Class,OUT>( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U4 >::type >( args[4] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U5 >::type >( args[5] ) ) ) ;
+ }
+ inline int nargs(){ return 6 ; }
+ inline bool is_void(){ return false ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<OUT,U0, U1, U2, U3, U4, U5>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
+ template < typename Class, typename U0, typename U1, typename U2, typename U3, typename U4, typename U5 > class Const_Pointer_CppMethod6<Class,void,U0, U1, U2, U3, U4, U5> : public CppMethod<Class> {
+ public:
+ typedef void (*Method)(const Class*, U0 u0, U1 u1, U2 u2, U3 u3, U4 u4, U5 u5) ;
+ typedef CppMethod<Class> method_class ;
+
+ Const_Pointer_CppMethod6( Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* args){
+ met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U4 >::type >( args[4] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U5 >::type >( args[5] ) ) ;
+ return R_NilValue ;
+ }
+ inline int nargs(){ return 6 ; }
+ inline bool is_void(){ return true ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<void_type,U0, U1, U2, U3, U4, U5>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
template < typename Class, typename OUT, typename U0, typename U1, typename U2, typename U3, typename U4, typename U5, typename U6 > class Pointer_CppMethod7 : public CppMethod<Class> {
public:
typedef OUT (*Method)(Class*, U0 u0, U1 u1, U2 u2, U3 u3, U4 u4, U5 u5, U6 u6) ;
@@ -314,7 +594,7 @@
Pointer_CppMethod7(Method m) : method_class(), met(m){}
SEXP operator()( Class* object, SEXP* args){
- return Rcpp::wrap( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U4 >::type >( args[4] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U5 >::type >( args[5] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U6 >::type >( args[6] ) ) ) ;
+ return Rcpp::module_wrap<Class,OUT>( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U4 >::type >( args[4] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U5 >::type >( args[5] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U6 >::type >( args[6] ) ) ) ;
}
inline int nargs(){ return 7 ; }
inline bool is_void(){ return false ; }
@@ -344,10 +624,50 @@
Method met ;
} ;
+
+ // const
+
+ template < typename Class, typename OUT, typename U0, typename U1, typename U2, typename U3, typename U4, typename U5, typename U6 > class Const_Pointer_CppMethod7 : public CppMethod<Class> {
+ public:
+ typedef OUT (*Method)(const Class*, U0 u0, U1 u1, U2 u2, U3 u3, U4 u4, U5 u5, U6 u6) ;
+ typedef CppMethod<Class> method_class ;
+
+ Const_Pointer_CppMethod7(Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* args){
+ return Rcpp::module_wrap<Class,OUT>( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U4 >::type >( args[4] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U5 >::type >( args[5] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U6 >::type >( args[6] ) ) ) ;
+ }
+ inline int nargs(){ return 7 ; }
+ inline bool is_void(){ return false ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<OUT,U0, U1, U2, U3, U4, U5, U6>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
+ template < typename Class, typename U0, typename U1, typename U2, typename U3, typename U4, typename U5, typename U6 > class Const_Pointer_CppMethod7<Class,void,U0, U1, U2, U3, U4, U5, U6> : public CppMethod<Class> {
+ public:
+ typedef void (*Method)(const Class*, U0 u0, U1 u1, U2 u2, U3 u3, U4 u4, U5 u5, U6 u6) ;
+ typedef CppMethod<Class> method_class ;
+
+ Const_Pointer_CppMethod7( Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* args){
+ met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U4 >::type >( args[4] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U5 >::type >( args[5] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U6 >::type >( args[6] ) ) ;
+ return R_NilValue ;
+ }
+ inline int nargs(){ return 7 ; }
+ inline bool is_void(){ return true ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<void_type,U0, U1, U2, U3, U4, U5, U6>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
template < typename Class, typename OUT, typename U0, typename U1, typename U2, typename U3, typename U4, typename U5, typename U6, typename U7 > class Pointer_CppMethod8 : public CppMethod<Class> {
public:
typedef OUT (*Method)(Class*, U0 u0, U1 u1, U2 u2, U3 u3, U4 u4, U5 u5, U6 u6, U7 u7) ;
@@ -355,7 +675,7 @@
Pointer_CppMethod8(Method m) : method_class(), met(m){}
SEXP operator()( Class* object, SEXP* args){
- return Rcpp::wrap( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U4 >::type >( args[4] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U5 >::type >( args[5] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U6 >::type >( args[6] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U7 >::type >( args[7] ) ) ) ;
+ return Rcpp::module_wrap<Class,OUT>( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U4 >::type >( args[4] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U5 >::type >( args[5] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U6 >::type >( args[6] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U7 >::type >( args[7] ) ) ) ;
}
inline int nargs(){ return 8 ; }
inline bool is_void(){ return false ; }
@@ -385,10 +705,50 @@
Method met ;
} ;
+
+ // const
+
+ template < typename Class, typename OUT, typename U0, typename U1, typename U2, typename U3, typename U4, typename U5, typename U6, typename U7 > class Const_Pointer_CppMethod8 : public CppMethod<Class> {
+ public:
+ typedef OUT (*Method)(const Class*, U0 u0, U1 u1, U2 u2, U3 u3, U4 u4, U5 u5, U6 u6, U7 u7) ;
+ typedef CppMethod<Class> method_class ;
+
+ Const_Pointer_CppMethod8(Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* args){
+ return Rcpp::module_wrap<Class,OUT>( met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U4 >::type >( args[4] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U5 >::type >( args[5] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U6 >::type >( args[6] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U7 >::type >( args[7] ) ) ) ;
+ }
+ inline int nargs(){ return 8 ; }
+ inline bool is_void(){ return false ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<OUT,U0, U1, U2, U3, U4, U5, U6, U7>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
+ template < typename Class, typename U0, typename U1, typename U2, typename U3, typename U4, typename U5, typename U6, typename U7 > class Const_Pointer_CppMethod8<Class,void,U0, U1, U2, U3, U4, U5, U6, U7> : public CppMethod<Class> {
+ public:
+ typedef void (*Method)(const Class*, U0 u0, U1 u1, U2 u2, U3 u3, U4 u4, U5 u5, U6 u6, U7 u7) ;
+ typedef CppMethod<Class> method_class ;
+
+ Const_Pointer_CppMethod8( Method m) : method_class(), met(m){}
+ SEXP operator()( Class* object, SEXP* args){
+ met( object, Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U0 >::type >( args[0] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U1 >::type >( args[1] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U2 >::type >( args[2] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U3 >::type >( args[3] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U4 >::type >( args[4] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U5 >::type >( args[5] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U6 >::type >( args[6] ), Rcpp::as< typename Rcpp::traits::remove_const_and_reference< U7 >::type >( args[7] ) ) ;
+ return R_NilValue ;
+ }
+ inline int nargs(){ return 8 ; }
+ inline bool is_void(){ return true ; }
+ inline bool is_const(){ return true ; }
+ inline void signature(std::string& s, const char* name){ Rcpp::signature<void_type,U0, U1, U2, U3, U4, U5, U6, U7>(s, name) ; }
+
+ private:
+ Method met ;
+ } ;
+
template < typename Class, typename OUT, typename U0, typename U1, typename U2, typename U3, typename U4, typename U5, typename U6, typename U7, typename U8 > class Pointer_CppMethod9 : public CppMethod<Class> {
public:
typedef OUT (*Method)(Class*, U0 u0, U1 u1, U2 u2, U3 u3, U4 u4, U5 u5, U6 u6, U7 u7, U8 u8) ;
@@ -396,7 +756,7 @@
Pointer_CppMethod9(Method m) : method_class(), met(m){}
SEXP operator()( Class* object, SEXP* args){
[TRUNCATED]
To get the complete diff run:
svnlook diff /svnroot/rcpp -r 3820
More information about the Rcpp-commits
mailing list