Running examples in 'dcmodifydb-Ex.R' failed
The error most likely occurred in:

> ### Name: is_working_db
> ### Title: Rule check on the database
> ### Aliases: is_working_db
> 
> ### ** Examples
> 
> person <- dbplyr::memdb_frame(age = 12, salary = 3000)
> 
> library(dcmodify)
> 
> correction_rules <- modifier( if (age < 16) salary = 0
+                             , if (retired == TRUE) salary = 0
+                             )
> 
> # second rule is not working, because retired is not available
> is_working_db(correction_rules, person, warn = FALSE)
Error in `dplyr::filter()`:
i In argument: `retired == TRUE`
Caused by error:
! Object `retired` not found.
Backtrace:
     x
  1. \-dcmodifydb::is_working_db(correction_rules, person, warn = FALSE)
  2.   \-dcmodifydb::modifier_to_sql(...)
  3.     \-base::lapply(...)
  4.       \-dcmodifydb (local) FUN(X[[i]], ...)
  5.         +-base::eval(bquote(dplyr::filter(table, .(g))))
  6.         | \-base::eval(bquote(dplyr::filter(table, .(g))))
  7.         +-dplyr::filter(table, retired == TRUE)
  8.         \-dbplyr:::filter.tbl_lazy(table, retired == TRUE)
  9.           \-dbplyr:::partial_eval_dots(.data, ..., .named = FALSE)
 10.             \-dbplyr:::partial_eval_quo(dot, .data, error_call, dot_name, was_named[[i]])
 11.               +-rlang::try_fetch(...)
 12.               | +-base::tryCatch(...)
 13.               | | \-base (local) tryCatchList(expr, classes, parentenv, handlers)
 14.               | |   \-base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
 15.               | |     \-base (local) doTryCatch(return(expr), name, parentenv, handler)
 16.               | \-base::withCallingHandlers(...)
 17.               \-dbplyr::partial_eval(get_expr(x), data, get_env(x), error_call = error_call)
 18.                 \-dbplyr:::partial_eval_call(call, data, env)
 19.                   \-base::lapply(call[-1], partial_eval, data = data, env = env)
 20.                     \-dbplyr (local) FUN(X[[i]], ...)
 21.                       \-dbplyr:::partial_eval_sym(call, data, env)
 22.                         \-cli::cli_abort("Object {.var {name}} not found.", call = NULL)
 23.                           \-rlang::abort(...)
Execution halted