We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
R_getVar()
1 parent cf9fe75 commit e74f674Copy full SHA for e74f674
src/rlang/env.h
@@ -59,10 +59,12 @@ r_obj* r_env_find_anywhere(r_obj* env, r_obj* sym) {
59
return Rf_findVar(sym, env);
60
}
61
62
-#if R_VERSION < R_Version(4, 5, 0)
63
-// Compatibility implementation for `R_getVar()`:
64
-// - Throws if not found
65
-// - Evaluates promises
+#if 1 || R_VERSION < R_Version(4, 5, 0)
+// We currently can't use `R_getVar()` which:
+// 1. Throws if not found
+// 2. Throws if argument is the missing arg
66
+// 3. Evaluates promises
67
+// Our operators have to return missing arguments.
68
static inline
69
r_obj* r_env_get(r_obj* env, r_obj* sym) {
70
r_obj* out = r_env_find(env, sym);
0 commit comments