Check inputs in num_range()

r-lib · Oct 25, 2024 · 559ee6e · 559ee6e
1 parent c9f30d3
commit 559ee6e
Show file tree

Hide file tree

Showing 2 changed files with 557 additions and 0 deletions.
diff --git a/R/helpers-pattern.R b/R/helpers-pattern.R
@@ -186,6 +186,9 @@ num_range <- function(prefix,
                       cross = FALSE,
                       vars = NULL) {
   check_dots_empty()
+  check_bool(cross)
+  check_number_whole(width, allow_null = TRUE)
+
   vars <- vars %||% peek_vars(fn = "num_range")
 
   if (cross) {