
  TYPE
    clt$established_handler = record
      condition: clt$when_condition,
      statements: ^clt$established_handler_stmnts,
    recend;

*copyc clt$when_condition
*copyc clt$established_handler_stmnts
