[Rcpp-commits] r729 - pkg/Rcpp/src

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

Author: romain
Date: 2010-02-17 22:02:51 +0100 (Wed, 17 Feb 2010)
New Revision: 729

Modified:
   pkg/Rcpp/src/Environment.cpp
Log:
use findVar instead of findVarInFrame (was causing trouble in RInside)

Modified: pkg/Rcpp/src/Environment.cpp
===================================================================
--- pkg/Rcpp/src/Environment.cpp	2010-02-17 16:58:52 UTC (rev 728)
+++ pkg/Rcpp/src/Environment.cpp	2010-02-17 21:02:51 UTC (rev 729)
@@ -93,7 +93,8 @@
     }
     
     SEXP Environment::get( const std::string& name) const {
-    	SEXP res = Rf_findVarInFrame( m_sexp, Rf_install(name.c_str())  ) ;
+    	// SEXP res = Rf_findVarInFrame( m_sexp, Rf_install(name.c_str())  ) ;
+    	SEXP res = Rf_findVar( Rf_install(name.c_str()), m_sexp ) ;
     	
     	if( res == R_UnboundValue ) return R_NilValue ;