[Rcpp-commits] r2494 - scripts

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

Author: romain
Date: 2010-11-22 20:44:19 +0100 (Mon, 22 Nov 2010)
New Revision: 2494

Modified:
   scripts/generator_Module_CppMethod.R
   scripts/generator_Module_PointerCppMethod.R
Log:
updates

Modified: scripts/generator_Module_CppMethod.R
===================================================================
--- scripts/generator_Module_CppMethod.R	2010-11-22 19:25:55 UTC (rev 2493)
+++ scripts/generator_Module_CppMethod.R	2010-11-22 19:44:19 UTC (rev 2494)
@@ -23,6 +23,8 @@
 		}
 		inline int nargs(){ return %d ; }
 		inline bool is_void(){ return false ; }
+		inline bool is_const(){ return false ; }
+		
 		const char* signature(const char* name ){ return Rcpp::signature<OUT,%s>(name) ; }
 	private:
 		Method met ;
@@ -40,6 +42,7 @@
 		}
 		inline int nargs(){ return %d ; }
 		inline bool is_void(){ return true ; }
+		inline bool is_const(){ return false ; }
 		const char* signature(const char* name ){ return Rcpp::signature<void_type,%s>(name) ; }
 	private:
 		Method met ;
@@ -58,6 +61,7 @@
 		}
 		inline int nargs(){ return %d ; }
 		inline bool is_void(){ return false ; }
+		inline bool is_const(){ return true ; }
 		const char* signature(const char* name ){ return Rcpp::signature<OUT,%s>(name) ; }
 		
 	private:
@@ -76,6 +80,7 @@
 		}
 		inline int nargs(){ return %d ; }
 		inline bool is_void(){ return true ; }
+		inline bool is_const(){ return true ; }
 		const char* signature(const char* name ){ return Rcpp::signature<void_type,%s>(name) ; }
 		
 	private:
@@ -158,6 +163,7 @@
 		}
 		inline int nargs(){ return 0 ; }
 		inline bool is_void(){ return false ; }
+		inline bool is_const(){ return false ; }
 		const char* signature(const char* name){ return Rcpp::signature<OUT>(name) ; }
 		
 	private:
@@ -175,6 +181,7 @@
 		}
 		inline int nargs(){ return 0 ; }
 		inline bool is_void(){ return true ; }
+		inline bool is_const(){ return false ; }
 		const char* signature(const char* name){ return Rcpp::signature<void_type>(name) ; }
 		
 	private:
@@ -191,6 +198,7 @@
 		}
 		inline int nargs(){ return 0 ; }
 		inline bool is_void(){ return false ; }
+		inline bool is_const(){ return true ; }
 		const char* signature(const char* name){ return Rcpp::signature<OUT>(name) ; }
 		
 	private:
@@ -208,6 +216,7 @@
 		}
 		inline int nargs(){ return 0 ; }
 		inline bool is_void(){ return true ; }
+		inline bool is_const(){ return true ; }
 		const char* signature(const char* name){ return Rcpp::signature<void_type>(name) ; }
 		
 	private:

Modified: scripts/generator_Module_PointerCppMethod.R
===================================================================
--- scripts/generator_Module_PointerCppMethod.R	2010-11-22 19:25:55 UTC (rev 2493)
+++ scripts/generator_Module_PointerCppMethod.R	2010-11-22 19:44:19 UTC (rev 2494)
@@ -23,6 +23,7 @@
 		}
 		inline int nargs(){ return %d ; }
 		inline bool is_void(){ return false ; }
+		inline bool is_const(){ return false ; }
 		const char* signature(const char* name){ return Rcpp::signature<OUT,%s>(name) ; }
 		
 	private:
@@ -41,6 +42,7 @@
 		}
 		inline int nargs(){ return %d ; }
 		inline bool is_void(){ return true ; }
+		inline bool is_const(){ return false ; }
 		const char* signature(const char* name){ return Rcpp::signature<void_type,%s>(name) ; }
 		
 	private:
@@ -106,6 +108,7 @@
 		}
 		inline int nargs(){ return 0 ; }
 		inline bool is_void(){ return false ; }
+		inline bool is_const(){ return false ; }
 		const char* signature(const char* name){ return Rcpp::signature<OUT>(name) ; }
 		
 	private:
@@ -123,6 +126,8 @@
 		}
 		inline int nargs(){ return 0 ; }
 		inline bool is_void(){ return true ; }
+		inline bool is_const(){ return false ; }
+    
 		const char* signature(const char* name){ return Rcpp::signature<void_type>(name) ; }
 		
 	private: