Skip to content
Prev 1331 / 10988 Next

[Rcpp-devel] Designing Rcpp modules - allow access to fields or to field accessor methods?

Le 18/11/10 22:41, Romain Francois a ?crit :
For convenience, here is the full example :

require( Rcpp )
require( inline )
inc <- '

class Simple {
public:

     Simple( double x ) : d_x(x){} ;

     const double& x(){ return d_x ;}

private:
     double d_x ;
		
} ;

RCPP_MODULE(mod){

	class_<Simple>( "Simple" )

	    .constructor(init_1<double>())
	
		.property( "x" , &Simple::x )
		;
		

}
'

fx <- cxxfunction( , '', includes = inc, plugin = "Rcpp" )
mod <- Module( "mod", getDynLib( fx ) )
Simple <- mod$Simple
r <- new( Simple, 10 )
r$x
r$x <- 20