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

codetools: named CTTemplateExpander

Browse Source 
git-svn-id: trunk@45467 -
This commit is contained in:
mattias 2014-06-10 17:11:32 +00:00
parent b6f04cc60c
commit a98eb2b2f4
3 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/codetools/codecompletiontemplater.pas
View File

@ -131,7 +131,7 @@ type
end; end;
var var
Expander : TTemplateExpander; // will be set by CodeToolBoss CTTemplateExpander : TTemplateExpander; // will be set by CodeToolBoss
implementation implementation

2
components/codetools/codecompletiontool.pas
View File

@ -84,7 +84,7 @@ uses
Classes, SysUtils, FileProcs, CodeToolsStrConsts, CodeTree, CodeAtom, Classes, SysUtils, FileProcs, CodeToolsStrConsts, CodeTree, CodeAtom,
CodeCache, CustomCodeTool, PascalParserTool, MethodJumpTool, CodeCache, CustomCodeTool, PascalParserTool, MethodJumpTool,
FindDeclarationTool, KeywordFuncLists, CodeToolsStructs, BasicCodeTools, FindDeclarationTool, KeywordFuncLists, CodeToolsStructs, BasicCodeTools,
LinkScanner, SourceChanger, CodeGraph, AVL_Tree, codecompletiontemplater; LinkScanner, SourceChanger, CodeGraph, AVL_Tree, CodeCompletionTemplater;
type type
TNewClassPart = (ncpPrivateProcs, ncpPrivateVars, TNewClassPart = (ncpPrivateProcs, ncpPrivateVars,

12
components/codetools/codetoolmanager.pas
View File

@ -46,7 +46,7 @@ uses
EventCodeTool, CodeTree, CodeAtom, SourceChanger, DefineTemplates, CodeCache, EventCodeTool, CodeTree, CodeAtom, SourceChanger, DefineTemplates, CodeCache,
ExprEval, LinkScanner, KeywordFuncLists, FindOverloads, CodeBeautifier, ExprEval, LinkScanner, KeywordFuncLists, FindOverloads, CodeBeautifier,
FindDeclarationCache, DirectoryCacher, AVL_Tree, FindDeclarationCache, DirectoryCacher, AVL_Tree,
PPUCodeTools, LFMTrees, DirectivesTree, codecompletiontemplater, PPUCodeTools, LFMTrees, DirectivesTree, CodeCompletionTemplater,
PascalParserTool, CodeToolsConfig, CustomCodeTool, FindDeclarationTool, PascalParserTool, CodeToolsConfig, CustomCodeTool, FindDeclarationTool,
IdentCompletionTool, StdCodeTools, ResourceCodeTool, CodeToolsStructs, IdentCompletionTool, StdCodeTools, ResourceCodeTool, CodeToolsStructs,
CTUnitGraph, CodeTemplatesTool, ExtractProcTool; CTUnitGraph, CodeTemplatesTool, ExtractProcTool;
@ -5745,11 +5745,11 @@ begin
else else
Code:=nil; Code:=nil;
if Code<>nil then begin if Code<>nil then begin
if Expander=nil then if CTTemplateExpander=nil then
Expander:=TTemplateExpander.Create; CTTemplateExpander:=TTemplateExpander.Create;
Expander.Code:=Code; CTTemplateExpander.Code:=Code;
end else begin end else begin
FreeAndNil(Expander); FreeAndNil(CTTemplateExpander);
end; end;
end; end;
@ -6346,7 +6346,7 @@ finalization
OnFindOwnerOfCodeTreeNode:=nil; OnFindOwnerOfCodeTreeNode:=nil;
CodeToolBoss.Free; CodeToolBoss.Free;
CodeToolBoss:=nil; CodeToolBoss:=nil;
FreeAndNil(Expander); FreeAndNil(CTTemplateExpander);
{$IFDEF CTDEBUG} {$IFDEF CTDEBUG}
DebugLn('codetoolmanager.pas - finalization finished'); DebugLn('codetoolmanager.pas - finalization finished');
{$ENDIF} {$ENDIF}