ast_.Rdast_ takes a quoted expression; ast does the quoting
for you.
ast_(x, width = getOption("width"))
ast(x)ast(f(x, 1, g(), h(i())))
#> ┗ ()
#> ┗ `f
#> ┗ `x
#> ┗ 1
#> ┗ ()
#> ┗ `g
#> ┗ ()
#> ┗ `h
#> ┗ ()
#> ┗ `i
ast(if (TRUE) 3 else 4)
#> ┗ ()
#> ┗ `if
#> ┗ TRUE
#> ┗ 3
#> ┗ 4
ast(function(a = 1, b = 2) {a + b + 10})
#> ┗ ()
#> ┗ `function
#> ┗ []
#> ┗ a = 1
#> ┗ b = 2
#> ┗ ()
#> ┗ `{
#> ┗ ()
#> ┗ `+
#> ┗ ()
#> ┗ `+
#> ┗ `a
#> ┗ `b
#> ┗ 10
#> ┗ <NULL>
ast(f(x)(y)(z))
#> ┗ ()
#> ┗ ()
#> ┗ ()
#> ┗ `f
#> ┗ `x
#> ┗ `y
#> ┗ `z
ast_(quote(f(x, 1, g(), h(i()))))
#> ┗ ()
#> ┗ `f
#> ┗ `x
#> ┗ 1
#> ┗ ()
#> ┗ `g
#> ┗ ()
#> ┗ `h
#> ┗ ()
#> ┗ `i
ast_(quote(if (TRUE) 3 else 4))
#> ┗ ()
#> ┗ `if
#> ┗ TRUE
#> ┗ 3
#> ┗ 4
ast_(expression(1, 2, 3))
#> ┗ 1
#>
#> ┗ 2
#>
#> ┗ 3