(Statements
  (Method
    (Empty)
  { (Identifier)
  ->(Identifier) }
  {-(Identifier)-}
    (Statements
    {-(Send
      {-(Identifier)-})-})))