> Try sourceCpp("somefile.cpp", verbose=TRUE) to see how the examples
> using Rcpp Attributes add an additional layer that deal with .Call and SEXP
> arguments.
Hi Dirk,
When I try to replicate the method used sourceCpp, I get the following
error. I'm not sure what is wrong. Would you please take a look how to
fix the error? Thanks.
~/dvcs_src/rexample/Rexample/cran/Rcpp/sourceCppFunction$ Rshl.sh main.cpp
llvm-g++-4.2 -arch x86_64 -dynamiclib -Wl,-headerpad_max_install_names
-undefined dynamic_lookup -single_module -multiply_defined suppress
-L/usr/local/lib -L/usr/local/lib -o main.so main.o
/Users/py/utility/R_user/Rcpp/lib/libRcpp.a
-F/Library/Frameworks/R.framework/.. -framework R -Wl,-framework
-Wl,CoreFoundation
~/dvcs_src/rexample/Rexample/cran/Rcpp/sourceCppFunction$ Rscript main.R
> library(Rcpp)
> dl=dyn.load('main.so')
> callFunction=Rcpp:::sourceCppFunction(function(x, f) {}, FALSE, dl,
> 'callFunction')
>
> set.seed(42)
> x=rnorm(1e5)
> callFunction
function (x, f)
.Primitive(".Call")(<pointer: 0x103c73660>, x, f)
> callFunction(x, fivenum)
terminate called after throwing an instance of 'Rcpp::not_compatible'
what(): cannot convert to function
Abort trap: 6
--
Regards,
Peng
_______________________________________________
Rcpp-devel mailing list
[email protected]
https://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/rcpp-devel
