See the original description in base::deparse1.
deparse1(expr, collapse = " ", width.cutoff = 500L, ...)# get function from namespace instead of possibly getting
# implementation shipped with recent R versions:
bp_deparse1 = getFromNamespace("deparse1", "backports")
bp_deparse1(quote(`foo bar`))
#> [1] "foo bar"