R/count_function_lines.R

In DavidBarke/QWUtils: Useful Methods For Programming with Shiny

Defines functions count_function_lines

Documented in count_function_lines

#' Count lines of a function definition
#'
#' @param fun Function name.
#'
#' @export
count_function_lines <- function(fun) {
  length(deparse(fun))
}