(Program
(While
{ (Identifier)
->(Identifier) }
(ExpressionStatements
(FunctionCall
->(Identifier) })))))