Sharpen version comparison with SVN commit reference

eddelbuettel · eddelbuettel · commit 894aa301c849 · 2026-04-02T20:22:23.000-05:00
diff --git a/inst/include/Rcpp/Function.h b/inst/include/Rcpp/Function.h
@@ -69,7 +69,7 @@ namespace Rcpp{
         }
 
         Function_Impl(const std::string& name, const std::string& ns) {
-#if R_VERSION < R_Version(4,6,0)
+#if R_VERSION < R_Version(4,6,0) || R_SVN_REVISION < 89746
             Shield<SEXP> env(Rf_findVarInFrame(R_NamespaceRegistry, Rf_install(ns.c_str())));
             if (env == R_UnboundValue)
                 stop("there is no namespace called \"%s\"", ns);

Original file line number	Diff line number	Diff line change
`@@ -69,7 +69,7 @@ namespace Rcpp{`
`69`	`69`	`}`
`70`	`70`
`71`	`71`	`Function_Impl(const std::string& name, const std::string& ns) {`
`72`		`-#if R_VERSION < R_Version(4,6,0)`
	`72`	`+#if R_VERSION < R_Version(4,6,0) \|\| R_SVN_REVISION < 89746`
`73`	`73`	`Shield<SEXP> env(Rf_findVarInFrame(R_NamespaceRegistry, Rf_install(ns.c_str())));`
`74`	`74`	`if (env == R_UnboundValue)`
`75`	`75`	`stop("there is no namespace called \"%s\"", ns);`