newtExitStruct

type newtExitStruct = record

  reason: treason;

  u: record

    case LongInt of

      0: (

          key: LongInt;

        );

      1: (

          co: newtComponent;

        );

  end;

end;