pascalidents

const pascalidents: array [firstpascalident..lastpascalident] of string = ('and', 'array', 'as', 'asm', 'begin', 'case', 'class', 'const', 'constructor', 'destructor', 'dispinterface', 'div', 'do', 'downto', 'else', 'end', 'except', 'exports', 'file', 'finalization', 'finally', 'for', 'function', 'goto', 'if', 'implementation', 'in', 'initialization', 'inline', 'forward', 'interface', 'is', 'label', 'library', 'method', 'mod', 'nil', 'not', 'object', 'of', 'or', 'out', 'overload', 'packed', 'procedure', 'program', 'property', 'raise', 'record', 'repeat', 'resourcestring', 'set', 'shl', 'shr', 'then', 'threadvar', 'to', 'try', 'type', 'unit', 'until', 'uses', 'var', 'while', 'with', 'xor', 'abstract', 'inherited', 'override', 'reintroduce', 'virtual', 'private', 'protected', 'public', 'published', 'automated', 'read', 'write', 'stored', 'default', 'nodefault');