Move vctrs wrappers

Author: DavisVaughan

R/across.R

@@ -366,24 +366,6 @@ if_all <- function(.cols, .fns, ..., .names = NULL) {
   dplyr_list_pall(x, size = size)
 }
 
-dplyr_list_pall <- function(
-  x,
-  ...,
-  size = NULL,
-  error_call = caller_env()
-) {
-  vec_pall(!!!x, .size = size, .error_call = error_call)
-}
-
-dplyr_list_pany <- function(
-  x,
-  ...,
-  size = NULL,
-  error_call = caller_env()
-) {
-  vec_pany(!!!x, .size = size, .error_call = error_call)
-}
-
 #' Combine values from multiple columns
 #'
 #' @description

R/vctrs.R

@@ -46,3 +46,25 @@ dplyr_list_recycle_common <- function(
   check_dots_empty0(...)
   vec_recycle_common(!!!x, .size = size, .call = call)
 }
+
+dplyr_list_pall <- function(
+  x,
+  ...,
+  missing = NA,
+  size = NULL,
+  error_call = caller_env()
+) {
+  check_dots_empty0(...)
+  vec_pall(!!!x, .missing = missing, .size = size, .error_call = error_call)
+}
+
+dplyr_list_pany <- function(
+  x,
+  ...,
+  missing = NA,
+  size = NULL,
+  error_call = caller_env()
+) {
+  check_dots_empty0(...)
+  vec_pany(!!!x, .missing = missing, .size = size, .error_call = error_call)
+}