[Rcpp-commits] r1070 - in pkg/Rcpp/inst/unitTests: . RcppTestB/src

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

Author: romain
Date: 2010-04-18 23:20:54 +0200 (Sun, 18 Apr 2010)
New Revision: 1070

Added:
   pkg/Rcpp/inst/unitTests/RcppTestB/
   pkg/Rcpp/inst/unitTests/RcppTestB/src/rcpp_hello_world.cpp
Removed:
   pkg/Rcpp/inst/unitTests/RcppTestB/src/rcpp_hello_world.cpp
Log:
new test package

Copied: pkg/Rcpp/inst/unitTests/RcppTestB (from rev 1058, pkg/Rcpp/inst/unitTests/RcppTestA)

Deleted: pkg/Rcpp/inst/unitTests/RcppTestB/src/rcpp_hello_world.cpp
===================================================================
--- pkg/Rcpp/inst/unitTests/RcppTestA/src/rcpp_hello_world.cpp	2010-04-17 12:27:36 UTC (rev 1058)
+++ pkg/Rcpp/inst/unitTests/RcppTestB/src/rcpp_hello_world.cpp	2010-04-18 21:20:54 UTC (rev 1070)
@@ -1,9 +0,0 @@
-#include "rcpp_hello_world.h"
-
-SEXP rcpp_hello_world(){
-	using namespace Rcpp ;
-	CharacterVector x = CharacterVector::create( "foo", "bar" )  ;
-	NumericVector y   = NumericVector::create( 0.0, 1.0 ) ;
-	List z = List::create( x, y ) ;
-	return z ;
-}

Copied: pkg/Rcpp/inst/unitTests/RcppTestB/src/rcpp_hello_world.cpp (from rev 1069, pkg/Rcpp/inst/unitTests/RcppTestA/src/rcpp_hello_world.cpp)
===================================================================
--- pkg/Rcpp/inst/unitTests/RcppTestB/src/rcpp_hello_world.cpp	                        (rev 0)
+++ pkg/Rcpp/inst/unitTests/RcppTestB/src/rcpp_hello_world.cpp	2010-04-18 21:20:54 UTC (rev 1070)
@@ -0,0 +1,15 @@
+#include "rcpp_hello_world.h"
+
+SEXP rcpp_hello_world(){
+	using namespace Rcpp ;
+	CharacterVector x = CharacterVector::create( "foo", "bar" )  ;
+	NumericVector y   = NumericVector::create( 0.0, 1.0 ) ;
+	List z = List::create( x, y ) ;
+	return z ;
+}
+
+#if defined(WIN32)
+extern "C" void R_init_RcppTestA( DllInfo* info){
+	std::set_terminate( forward_uncaught_exceptions_to_r ) ;
+}
+#endif