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