Interactive Tester

foo { a <- function(b=function() { }) { } }