[Rcpp-commits] r1299 - pkg/Rcpp/inst/include/Rcpp

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Thu May 20 20:31:33 CEST 2010


Author: romain
Date: 2010-05-20 20:31:32 +0200 (Thu, 20 May 2010)
New Revision: 1299

Modified:
   pkg/Rcpp/inst/include/Rcpp/preprocessor.h
Log:
space around the <> in macros

Modified: pkg/Rcpp/inst/include/Rcpp/preprocessor.h
===================================================================
--- pkg/Rcpp/inst/include/Rcpp/preprocessor.h	2010-05-20 17:18:35 UTC (rev 1298)
+++ pkg/Rcpp/inst/include/Rcpp/preprocessor.h	2010-05-20 18:31:32 UTC (rev 1299)
@@ -72,7 +72,7 @@
 extern "C" SEXP __NAME__( SEXP xp ){                           \
 	SEXP res = R_NilValue ;                                    \
 	BEGIN_RCPP                                                 \
-		::Rcpp::XPtr<__CLASS__> ptr(xp) ;                      \
+		::Rcpp::XPtr< __CLASS__ > ptr(xp) ;                    \
 		res = ::Rcpp::wrap( ptr->__FIELD__ ) ;                 \
 	return res ;                                               \
 	END_RCPP                                                   \
@@ -90,7 +90,7 @@
 }                                                              \
 extern "C" SEXP __NAME__( SEXP xp, SEXP value ){               \
 	BEGIN_RCPP                                                 \
-		::Rcpp::XPtr<__CLASS__> ptr(xp) ;                      \
+		::Rcpp::XPtr< __CLASS__ > ptr(xp) ;                    \
 		ptr->__FIELD__ = ::Rcpp::internal::converter(value) ;  \
 	END_RCPP                                                   \
 }
@@ -102,16 +102,16 @@
 
 #define RCPP_TRAITS(__CLASS__,__SEXPTYPE__)                     \
 namespace Rcpp{ namespace traits {                                \
-template<> struct r_type_traits<__CLASS__>{                       \
+template<> struct r_type_traits< __CLASS__ >{                       \
 	typedef r_type_primitive_tag r_category ;                     \
 } ;                                                               \
 template<> struct r_type_traits< std::pair< std::string , __CLASS__ > >{   \
 	typedef r_type_pairstring_primitive_tag r_category ;          \
 } ;                                                               \
-template<> struct wrap_type_traits<__CLASS__>{                    \
+template<> struct wrap_type_traits< __CLASS__ >{                    \
 	typedef wrap_type_primitive_tag wrap_category ;               \
 } ;                                                               \
-template<> struct r_sexptype_traits<__CLASS__>{                   \
+template<> struct r_sexptype_traits< __CLASS__ >{                   \
 	enum{ rtype = __SEXPTYPE__ } ;                                \
 } ;                                                               \
 } }



More information about the Rcpp-commits mailing list