R/calls.R

In PRL-PRG/evil: Eval Inspection Library

create_call_row <- function(eval_call_id = integer(0),
                            eval_function = character(0),
                            eval_call_expression = character(0),
                            eval_call_srcref = character(0),
                            caller_package = character(0),
                            caller_function = character(0),
                            caller_expression = character(0),
                            caller_srcref = character(0),
                            environment_class = character(0),
                            successful = logical(0),
                            expr_expression = character(0),
                            expr_expression_hash = character(0),
                            expr_expression_length = integer(0),
                            expr_expression_type = character(0),
                            expr_expression_type_tag = character(0),
                            expr_expression_nodes = integer(0),
                            expr_expression_function = character(0),
                            expr_expression_args_num = integer(0),
                            expr_resolved = character(0),
                            expr_resolved_hash = character(0),
                            expr_resolved_length = integer(0),
                            expr_resolved_type = character(0),
                            expr_resolved_type_tag = character(0),
                            expr_resolved_nodes = integer(0),
                            expr_resolved_function = character(0),
                            expr_resolved_args_num = integer(0),
                            expr_resolved_class = character(0),
                            expr_return = character(0),
                            expr_return_hash = character(0),
                            expr_return_length = integer(0),
                            expr_return_type = character(0),
                            expr_return_type_tag = character(0),
                            expr_parsed_expression = character(0),
                            expr_forced = logical(0),
                            envir_expression = character(0),
                            envir_forced = logical(0),
                            envir_type = character(0),
                            expr_match_call = character(0),
                            enclos_expression = character(0),
                            enclos_forced = logical(0),
                            enclos_type = character(0),
                            enclosure_class = character(0),
                            interp_eval = integer(0)) {
    data.frame(eval_call_id                   = eval_call_id,
               eval_function                  = eval_function,
               eval_call_expression           = eval_call_expression,
               eval_call_srcref               = eval_call_srcref,
               caller_package                 = caller_package,
               caller_function                = caller_function,
               caller_expression              = caller_expression,
               caller_srcref                  = caller_srcref,
               environment_class              = environment_class,
               successful                     = successful,
               expr_expression                = expr_expression,
               expr_expression_hash           = expr_expression_hash,
               expr_expression_length         = expr_expression_length,
               expr_expression_type           = expr_expression_type,
               expr_expression_type_tag       = expr_expression_type_tag,
               expr_expression_nodes          = expr_expression_nodes,
               expr_expression_function       = expr_expression_function,
               expr_expression_args_num       = expr_expression_args_num,
               expr_resolved                  = expr_resolved,
               expr_resolved_hash             = expr_resolved_hash,
               expr_resolved_length           = expr_resolved_length,
               expr_resolved_type             = expr_resolved_type,
               expr_resolved_type_tag         = expr_resolved_type_tag,
               expr_resolved_nodes            = expr_resolved_nodes,
               expr_resolved_function         = expr_resolved_function,
               expr_resolved_args_num         = expr_resolved_args_num,
               expr_resolved_class            = expr_resolved_class,
               expr_return                    = expr_return,
               expr_return_hash               = expr_return_hash,
               expr_return_length             = expr_return_length,
               expr_return_type               = expr_return_type,
               expr_return_type_tag           = expr_return_type_tag,
               expr_parsed_expression         = expr_parsed_expression,
               expr_forced                    = expr_forced,
               envir_expression               = envir_expression,
               envir_forced                   = envir_forced,
               envir_type                     = envir_type,
               expr_match_call                = expr_match_call,
               enclos_expression              = enclos_expression,
               enclos_forced                  = enclos_forced,
               enclos_type                    = enclos_type,
               enclosure_class                = enclosure_class,
               interp_eval                    = interp_eval)
}