R/get_directory.R

In PRL-PRG/instrumentr: Instrumentation Framework for R

#' @export
get_directory <- function(object, ...) {
    UseMethod("get_directory")
}

#' @export
get_directory.instrumentr_application <- function(object, ...) { # nolint
    .Call(C_application_get_directory, object)
}

#' @export
get_directory.instrumentr_package <- function(object, ...) { # nolint
    .Call(C_package_get_directory, object)
}