Source position: pastree.pp line 1821
const InterfaceTypeNames: array [TPasClassInterfaceType] of TPastreeString = ('COM', 'Corba');