(Program
  (While
    (Identifier)
    (Statements
      (Call
        (Identifier)
        (Empty))))
  (Empty))