paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-10 14:16:25 +02:00
Code Issues Packages Projects Releases Wiki Activity

codetools: identifier completion: updated list of directives

Browse Source 
git-svn-id: trunk@47932 -
This commit is contained in:
mattias 2015-02-21 09:06:14 +00:00
parent 6025925c8a
commit 04d81bf59c
1 changed files with 57 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

61
components/codetools/identcompletiontool.pas
View File

@ -2108,38 +2108,61 @@ begin
and (CursorPos.X<=InnerStart+GetIdentLen(@Line[InnerStart]))) and (CursorPos.X<=InnerStart+GetIdentLen(@Line[InnerStart])))
then begin then begin
// at start of directive // at start of directive
// see fpc/compiler/scandir.pas // see fpc/compiler/scandir.pas (incomplete list, e.g. Define is missing there)
AddKeyWord('A1');
AddKeyWord('A2');
AddKeyWord('A4');
AddKeyWord('A8');
AddKeyWord('Align'); AddKeyWord('Align');
AddKeyWord('AlignAssertions'); AddKeyWord('AlignAssertions');
AddKeyWord('AppID');
AddKeyWord('AppName');
AddKeyWord('AppType');
AddKeyWord('AsmMode'); AddKeyWord('AsmMode');
AddKeyWord('Assertions'); AddKeyWord('Assertions');
AddKeyWord('BitPacking'); AddKeyWord('BitPacking');
AddKeyWord('BoolEval'); AddKeyWord('BoolEval');
AddKeyWord('Calling'); AddKeyWord('Calling');
AddKeyWord('CheckLowAddrLoads');
AddKeyWord('CheckPointer'); AddKeyWord('CheckPointer');
AddKeyWord('CodeAlign'); AddKeyWord('CodeAlign');
AddKeyWord('Codepage');
AddKeyWord('COperators'); AddKeyWord('COperators');
AddKeyWord('Copyright');
AddKeyWord('D');
AddKeyWord('DebugInfo'); AddKeyWord('DebugInfo');
AddKeyWord('Define'); AddKeyWord('Define');
AddKeyWord('Description');
AddKeyWord('ElIfC'); AddKeyWord('ElIfC');
AddKeyWord('Else'); AddKeyWord('Else');
AddKeyWord('ElseC'); AddKeyWord('ElseC');
AddKeyWord('ElseIf'); AddKeyWord('ElseIf');
AddKeyWord('EndC'); AddKeyWord('EndC');
AddKeyWord('EndIf'); AddKeyWord('EndIf');
AddKeyWord('EndRegion');
AddKeyWord('Error'); AddKeyWord('Error');
AddKeyWord('ErrorC'); AddKeyWord('ErrorC');
AddKeyWord('ExtendedSyntax'); AddKeyWord('ExtendedSyntax');
AddKeyWord('ExternalSym');
AddKeyWord('F');
AddKeyWord('Fatal'); AddKeyWord('Fatal');
AddKeyWord('FPUType'); AddKeyWord('FPUType');
AddKeyWord('FrameworkPath');
AddKeyWord('Goto'); AddKeyWord('Goto');
AddKeyWord('Hint'); AddKeyWord('Hint');
AddKeyWord('Hints'); AddKeyWord('Hints');
AddKeyWord('HPPEmit');
AddKeyWord('HugeCode');
AddKeyWord('HugePointerArithmetikNormalization');
AddKeyWord('HugePointerComparisonNormalization');
AddKeyWord('HugePointerNormalization');
AddKeyWord('IEEEErrors');
AddKeyWord('IfC'); AddKeyWord('IfC');
AddKeyWord('IfDef'); AddKeyWord('IfDef');
AddKeyWord('IfEnd'); AddKeyWord('IfEnd');
AddKeyWord('IfNDef'); AddKeyWord('IfNDef');
AddKeyWord('IfOpt'); AddKeyWord('IfOpt');
AddKeyWord('ImageBase');
AddKeyWord('ImplicitExceptions'); AddKeyWord('ImplicitExceptions');
AddKeyWord('Include'); AddKeyWord('Include');
AddKeyWord('IncludePath'); AddKeyWord('IncludePath');
@ -2147,15 +2170,22 @@ begin
AddKeyWord('Inline'); AddKeyWord('Inline');
AddKeyWord('Interfaces'); AddKeyWord('Interfaces');
AddKeyWord('IOChecks'); AddKeyWord('IOChecks');
AddKeyWord('L');
AddKeyWord('LibExport');
AddKeyWord('LibraryPath');
AddKeyWord('Link'); AddKeyWord('Link');
AddKeyWord('LinkFramework'); AddKeyWord('LinkFramework');
AddKeyWord('LinkLib'); AddKeyWord('LinkLib');
AddKeyWord('LocalSymbols'); AddKeyWord('LocalSymbols');
AddKeyWord('LongStrings'); AddKeyWord('LongStrings');
AddKeyWord('M');
AddKeyWord('Macro'); AddKeyWord('Macro');
AddKeyWord('MaxFPURegisters'); AddKeyWord('MaxFPURegisters');
AddKeyWord('MaxStackSize');
AddKeyWord('Memory');
AddKeyWord('Message'); AddKeyWord('Message');
AddKeyWord('MinEnumSize'); AddKeyWord('MinEnumSize');
AddKeyWord('MinFPConstPrec');
AddKeyWord('MMX'); AddKeyWord('MMX');
AddKeyWord('Mode'); AddKeyWord('Mode');
AddKeyWord('ModeSwitch'); AddKeyWord('ModeSwitch');
@ -2163,32 +2193,55 @@ begin
AddKeyWord('Note'); AddKeyWord('Note');
AddKeyWord('Notes'); AddKeyWord('Notes');
AddKeyWord('ObjectChecks'); AddKeyWord('ObjectChecks');
AddKeyWord('ObjectPath');
AddKeyWord('OpenStrings'); AddKeyWord('OpenStrings');
AddKeyWord('Optimization'); AddKeyWord('Optimization');
AddKeyWord('Output_Format'); AddKeyWord('Output_Format');
AddKeyWord('OV'); AddKeyWord('OV');
AddKeyWord('OverflowChecks'); AddKeyWord('OverflowChecks');
AddKeyWord('PackEnum'); AddKeyWord('PackEnum');
AddKeyWord('PackEecords'); AddKeyWord('PackRecords');
AddKeyWord('PackSet'); AddKeyWord('PackSet');
AddKeyWord('PIC'); AddKeyWord('PIC');
AddKeyWord('PointerMath'); AddKeyWord('PointerMath');
AddKeyWord('Pop'); AddKeyWord('Pop');
AddKeyWord('Profile');
AddKeyWord('Push'); AddKeyWord('Push');
AddKeyWord('R');
AddKeyWord('RangeChecks'); AddKeyWord('RangeChecks');
AddKeyWord('ReferenceInfo'); AddKeyWord('ReferenceInfo');
AddKeyWord('Region');
AddKeyWord('Resource');
AddKeyWord('SafeFPUExceptions');
AddKeyWord('Saturation');
AddKeyWord('ScopedEnums');
AddKeyWord('ScreenName');
AddKeyWord('SetC'); AddKeyWord('SetC');
AddKeyWord('SetPEFlags');
AddKeyWord('SetPEOptFlags');
AddKeyWord('SmartLink');
AddKeyWord('StackFrames'); AddKeyWord('StackFrames');
AddKeyWord('Stop'); AddKeyWord('Stop');
AddKeyWord('Threading'); AddKeyWord('StringChecks');
AddKeyWord('TypeAddress'); AddKeyWord('Syscall');
AddKeyWord('TargetSwitch');
AddKeyWord('ThreadName');
AddKeyWord('TypedAddress');
AddKeyWord('TypeInfo'); AddKeyWord('TypeInfo');
AddKeyWord('UnDef'); AddKeyWord('UnDef');
AddKeyWord('UnitPath');
AddKeyWord('VarParaCopyOutCheck');
AddKeyWord('VarPropSetter');
AddKeyWord('VarStringChecks'); AddKeyWord('VarStringChecks');
AddKeyWord('Wait'); AddKeyWord('Wait');
AddKeyWord('Warn');
AddKeyWord('Warning'); AddKeyWord('Warning');
AddKeyWord('Warnings'); AddKeyWord('Warnings');
AddKeyWord('WeakPackageUnit');
AddKeyWord('WriteableConst'); // unusual spelling in fpc AddKeyWord('WriteableConst'); // unusual spelling in fpc
AddKeyWord('Z1');
AddKeyWord('Z2');
AddKeyWord('Z4');
AddKeyWord('ZeroBasedStrings'); AddKeyWord('ZeroBasedStrings');
end else if InnerStart<=length(Line) then begin end else if InnerStart<=length(Line) then begin
// in parameter of directive // in parameter of directive