mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-11 23:39:09 +02:00
clean up
git-svn-id: trunk@16953 -
This commit is contained in:
parent
354a0d40d4
commit
e5de689ab4
@ -2613,9 +2613,6 @@ end;
|
||||
function TCodeToolManager.AddIncludeDirective(Code: TCodeBuffer;
|
||||
const Filename: string; const NewSrc: string
|
||||
): boolean;
|
||||
var
|
||||
Tree: TCompilerDirectivesTree;
|
||||
Node: TCodeTreeNode;
|
||||
begin
|
||||
Result:=false;
|
||||
{$IFDEF CTDEBUG}
|
||||
|
@ -4821,7 +4821,6 @@ end;
|
||||
function TStandardCodeTool.FindIncludeDirective(DoBuildTree: boolean;
|
||||
var ACleanPos: integer; const Filename: string): boolean;
|
||||
var
|
||||
ParamPos: Integer;
|
||||
FilenameStartPos: Integer;
|
||||
FilenameEndPos: LongInt;
|
||||
CommentStart: integer;
|
||||
|
Loading…
Reference in New Issue
Block a user