TMethodKind = (
  mkProcedure,
  mkFunction,
  mkConstructor,
  mkDestructor,
  mkClassProcedure,
  mkClassFunction,
  mkClassConstructor,
  mkOperatorOverload,
  mkSafeProcedure,
  mkSafeFunction
);

enum TMethodKind {
  mkProcedure,
  mkFunction,
  mkConstructor,
  mkDestructor,
  mkClassProcedure,
  mkClassFunction,
  mkClassConstructor,
  mkOperatorOverload,
  mkSafeProcedure,
  mkSafeFunction
};