[Rcpp-commits] r1247 - pkg/Rcpp/inst/include
noreply at r-forge.r-project.org
noreply at r-forge.r-project.org
Sun May 16 18:18:26 CEST 2010
Author: edd
Date: 2010-05-16 18:18:25 +0200 (Sun, 16 May 2010)
New Revision: 1247
Modified:
pkg/Rcpp/inst/include/RcppCommon.h
Log:
only white-space changes on indentation
Modified: pkg/Rcpp/inst/include/RcppCommon.h
===================================================================
--- pkg/Rcpp/inst/include/RcppCommon.h 2010-05-14 23:30:44 UTC (rev 1246)
+++ pkg/Rcpp/inst/include/RcppCommon.h 2010-05-16 16:18:25 UTC (rev 1247)
@@ -1,4 +1,4 @@
-// -*- mode: C++; c-indent-level: 4; c-basic-offset: 4; tab-width: 8 -*-
+// -*- mode: C++; c-indent-level: 4; c-basic-offset: 4; tab-width: 4 -*-
//
// RcppCommon.h: Rcpp R/C++ interface class library -- common include and defines statements
//
@@ -30,16 +30,18 @@
* \brief Rcpp API
*/
namespace Rcpp{
-/**
- * \brief traits used to dispatch wrap
- */
-namespace traits{
-} // traits
-/**
- * \brief internal implementation details
- */
-namespace internal{
-} // internal
+
+ /**
+ * \brief traits used to dispatch wrap
+ */
+ namespace traits{
+ } // traits
+
+ /**
+ * \brief internal implementation details
+ */
+ namespace internal{
+ } // internal
} // Rcpp
#ifdef __GNUC__
@@ -113,13 +115,13 @@
namespace Rcpp{
-namespace internal{
-template <typename T> int rcpp_call_test(T t){
- return T::r_type::value ;
+ namespace internal{
+ template <typename T> int rcpp_call_test(T t){
+ return T::r_type::value ;
+ }
+ int rcpp_call_test_(SEXP) ;
+ }
}
-int rcpp_call_test_(SEXP) ;
-}
-}
extern "C" SEXP rcpp_call_test(SEXP x) ;
@@ -150,22 +152,22 @@
#include <Rcpp/exceptions.h>
namespace Rcpp{
-/* internal namespace for things not intended to be used by the
- user */
-namespace internal{
+ /* internal namespace for things not intended to be used by the
+ user */
+ namespace internal{
- /* defined in Evaluator.cpp */
- SEXP convert_using_rfunction(SEXP x, const char* const fun) throw(::Rcpp::not_compatible) ;
+ /* defined in Evaluator.cpp */
+ SEXP convert_using_rfunction(SEXP x, const char* const fun) throw(::Rcpp::not_compatible) ;
- SEXP try_catch( SEXP expr, SEXP env ) throw(::Rcpp::eval_error) ;
- SEXP try_catch( SEXP expr ) throw(::Rcpp::eval_error) ;
+ SEXP try_catch( SEXP expr, SEXP env ) throw(::Rcpp::eval_error) ;
+ SEXP try_catch( SEXP expr ) throw(::Rcpp::eval_error) ;
-} // namespace internal
+ } // namespace internal
-inline bool Rboolean_to_bool( int x){ return x == TRUE ; }
-inline bool int_to_bool(int x){ return x != 0 ; }
-inline bool double_to_bool(double x){ return x != 0.0 ; }
-inline bool Rbyte_to_bool(Rbyte x){ return x != static_cast<Rbyte>(0) ; }
+ inline bool Rboolean_to_bool( int x){ return x == TRUE ; }
+ inline bool int_to_bool(int x){ return x != 0 ; }
+ inline bool double_to_bool(double x){ return x != 0.0 ; }
+ inline bool Rbyte_to_bool(Rbyte x){ return x != static_cast<Rbyte>(0) ; }
} // namespace Rcpp
More information about the Rcpp-commits
mailing list