tests/nested.R

library(CodeAnalysis)
f =
function(x, y)
{
    a = x + y
    g = function(w)
            w + a / x^2

    g(300)
}

v = getGlobals(f)
stopifnot(length(v$variables) == 0)
duncantl/CodeAnalysis documentation built on March 1, 2025, 9:54 p.m.