Source position: pastree.pp line 1734
const ObjKindNames: array [TPasObjKind] of string = ('object', 'class', 'interface', 'class helper', 'record helper', 'type helper', 'dispinterface', 'ObjcClass', 'ObjcCategory', 'ObjcProtocol');