Parse error on anonymous function passed as function parameter

[nishtahir]

Code sample to reproduce

sub buOptionalTests()
    res = optional.ifPresent(function(value) as Integer 'parse error
        return value + 1
     end function)
end sub