create vintage call to be parsed into get_vintage_pattern_regex()

create_vintage_pattern_call(vintage_pattern = NULL)

Arguments

vintage_pattern

either NULL, chracter with regex or list of arguments for get_vintage_pattern_regex()

Value

list to be parses t get_vintage_pattern_regex()

Examples

if (FALSE) {
vintage_pattern <- NULL
create_vintage_pattern_call(vintage_pattern)

vintage_pattern <- list("r.*", "", "^hjkhj\\.d")
create_vintage_pattern_call(vintage_pattern)

vintage_pattern <- c("r.*", "", "^hjkhj\\.d")
create_vintage_pattern_call(vintage_pattern)

vintage_pattern <- c(vintage_pattern = "r.*", test_regex = "", int_regex =  "^hjkhj\\.d")
create_vintage_pattern_call(vintage_pattern)
}