R/get_expression.R

In PRL-PRG/instrumentr: Instrumentation Framework for R

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

#' @export
get_expression.instrumentr_call <- function(object, ...) { # nolint
    .Call(C_call_get_expression, object)
}

#' @export
get_expression.instrumentr_argument <- function(object, ...) { # nolint
    .Call(C_argument_get_expression, object)
}