/usr/lib/R/site-library/lambda.r/unitTests/runit.function_type.1.R is in r-cran-lambda.r 1.1.9-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | test.function_type_1 <- function() {
seq.gen(start) %::% a : Function
seq.gen(start) %as%
{
value <- start - 1
function() {
value <<- value + 1
return(value)
}
}
seal(seq.gen)
act <- seq.gen(1)
checkTrue('function' %in% class(act))
}
|