Change branch's 'merge' argument to 'continue' about simmer HOT 6 CLOSED

# roxygen documentation here
# @export
somefunc <- function(continue, x) {
  x * continue
}

# save the latter
somefunc.call <- somefunc
# intercept it
somefunc <- function(...) {
  # get call
  caller <- sys.call()
  # replace the function name
  caller[[1]] <- as.name("somefunc.call")
  # replace "continue" and show a warning if "merge" is found
  if ("merge" %in% names(caller)) {
    warning("'merge' is deprecated, use 'continue' instead")
    caller$continue <- caller$merge
    caller$merge <- NULL
  }
  # make the proper call
  eval(caller)
}

somefunc(continue=2, 3)
#> [1] 6
somefunc(2, 3)
#> [1] 6
somefunc(merge=2, 3)
#> [1] 6
#> Warning message:
#> In somefunc(merge = 2, 3) : 'merge' is deprecated, use 'continue' instead

branch <- function(traj, option, continue=merge, merge=continue, ...) traj$branch(option, continue, ...)

the_func<-function(new=old, old="_deprecated"){
  if(!old=="_deprecated") warning("use of 'old' is deprecated")
  new
}

# new param works
the_func(new=123)
# unnamed call works
the_func(123)
# old works and shows a warning
the_func(old=123)