> compare(quote(a), quote(b))
`old` is `a`
`new` is `b`

> compare(quote(a + b), quote(b + c))
`old`: `a + b`
`new`: `b + c`

> x <- y <- quote(foo(1:3))
> y[[2]] <- 1:3
> compare(x, y)
`old[[2]]` is a call
`new[[2]]` is an integer vector (1, 2, 3)

> compare(expression(1, a, a + b), expression(1, a, a + b))
v No differences

> compare(expression(1, a, a + b), expression(1, a, a + c))
`old[[3]]`: `a + b`
`new[[3]]`: `a + c`

