(Program
  (Try
    (
      (Send
        (Identifier))
      (Catch
        ([])
      { (Send
        {-(Identifier)-})
      ->([]) }))))