From 26fb8779842d874694e0db9447bb2e01ce023322 Mon Sep 17 00:00:00 2001 From: Davis Vaughan Date: Thu, 23 Oct 2025 13:02:49 -0400 Subject: [PATCH] Fix up `r_eval_with_*()` counts --- src/rlang/eval.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/rlang/eval.c b/src/rlang/eval.c index ba069ddde2..4afff16c43 100644 --- a/src/rlang/eval.c +++ b/src/rlang/eval.c @@ -11,7 +11,7 @@ r_obj* r_eval_with_x(r_obj* call, r_obj* x, r_obj* parent) { return out; } r_obj* r_eval_with_xy(r_obj* call, r_obj* x, r_obj* y, r_obj* parent) { - r_obj* env = KEEP(r_alloc_environment(1, parent)); + r_obj* env = KEEP(r_alloc_environment(2, parent)); r_env_poke(env, r_syms.x, x); r_env_poke(env, r_syms.y, y); @@ -21,7 +21,7 @@ r_obj* r_eval_with_xy(r_obj* call, r_obj* x, r_obj* y, r_obj* parent) { return out; } r_obj* r_eval_with_xyz(r_obj* call, r_obj* x, r_obj* y, r_obj* z, r_obj* parent) { - r_obj* env = KEEP(r_alloc_environment(1, parent)); + r_obj* env = KEEP(r_alloc_environment(3, parent)); r_env_poke(env, r_syms.x, x); r_env_poke(env, r_syms.y, y); r_env_poke(env, r_syms.z, z); @@ -32,7 +32,7 @@ r_obj* r_eval_with_xyz(r_obj* call, r_obj* x, r_obj* y, r_obj* z, r_obj* parent) return out; } r_obj* r_eval_with_wxyz(r_obj* call, r_obj* w, r_obj* x, r_obj* y, r_obj* z, r_obj* parent) { - r_obj* env = KEEP(r_alloc_environment(1, parent)); + r_obj* env = KEEP(r_alloc_environment(4, parent)); r_env_poke(env, r_syms.w, w); r_env_poke(env, r_syms.x, x); r_env_poke(env, r_syms.y, y);