Find the parent (first) promise.

Source: R/promise.r

Find the parent (first) promise.

parent_promise(x)

Arguments

x

unquoted name of promise to find initial value for for.

Examples

f <- function(x) g(x)
g <- function(y) h(y)
h <- function(z) parent_promise(z)

h(x + 1)
#> x + 1
g(x + 1)
#> x + 1
f(x + 1)
#> x + 1