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

codetools: clean up

Browse Source 
git-svn-id: trunk@48646 -
This commit is contained in:
mattias 2015-04-06 16:38:06 +00:00
parent aac82f6bce
commit 5503c1b358
4 changed files with 8 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/codetools/codetoolscfgscript.pas
View File

@ -231,8 +231,8 @@ type
function GetOperatorLevel(P: PChar): integer; function GetOperatorLevel(P: PChar): integer;
function IsKeyWord(P: PChar): boolean; function IsKeyWord(P: PChar): boolean;
function IsFunction(P: PChar): boolean; function IsFunction(P: PChar): boolean;
function IsCustomFunction(FunctionName: PChar): boolean; virtual; function IsCustomFunction({%H-}FunctionName: PChar): boolean; virtual;
procedure RunCustomSimpleFunction(FunctionName: PChar; Value: PCTCfgScriptVariable); virtual; procedure RunCustomSimpleFunction({%H-}FunctionName: PChar; {%H-}Value: PCTCfgScriptVariable); virtual;
public public
Src: PChar; Src: PChar;
AtomStart: PChar; AtomStart: PChar;

4
components/codetools/ctloadlaz.pas
View File

@ -273,7 +273,9 @@ end;
procedure TCTLazarusModule.LoadFromConfig(Cfg: TXMLConfig); procedure TCTLazarusModule.LoadFromConfig(Cfg: TXMLConfig);
begin begin
if Cfg=nil then ;
// ToDo
RaiseCatchableException('not implemented yet');
end; end;
{ TCTLazarusManager } { TCTLazarusManager }

4
components/codetools/ctunitgraph.pas
View File

@ -31,8 +31,8 @@ interface
uses uses
Classes, SysUtils, AVL_Tree, FileProcs, FindDeclarationTool, CodeBeautifier, Classes, SysUtils, AVL_Tree, FileProcs, FindDeclarationTool, CodeBeautifier,
CodeGraph, CodeCache, StdCodeTools, DirectoryCacher, LinkScanner, CodeCache, StdCodeTools, DirectoryCacher, LinkScanner,
CustomCodeTool, CodeTree, CodeAtom, CodeToolsStructs; CustomCodeTool, CodeTree, CodeToolsStructs;
type type

2
components/codetools/directivestree.pas
View File

@ -38,7 +38,7 @@ uses
MemCheck, MemCheck,
{$ENDIF} {$ENDIF}
Classes, SysUtils, FileProcs, CodeToolsStructs, BasicCodeTools, Classes, SysUtils, FileProcs, CodeToolsStructs, BasicCodeTools,
KeywordFuncLists, LinkScanner, CodeAtom, CodeCache, AVL_Tree, KeywordFuncLists, LinkScanner, CodeCache, AVL_Tree,
ExprEval, CodeTree; ExprEval, CodeTree;
type type