paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-08 19:47:30 +01:00
Code Issues Packages Projects Releases Wiki Activity

IDE: clean up

Browse Source 
git-svn-id: trunk@41198 -
This commit is contained in:
mattias 2013-05-14 21:53:07 +00:00
parent 3904b0b4eb
commit 0a5a0160d1
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
ide/sourceeditor.pp
View File

@ -2678,11 +2678,11 @@ begin
if Result=nil then
begin
// create main scanner
debugln(['TSourceEditorSharedValues.GetMainLinkScanner fetching unit codebuffer ...']);
//debugln(['TSourceEditorSharedValues.GetMainLinkScanner fetching unit codebuffer ...']);
if CodeBuffer=nil then exit;
if not CodeToolBoss.InitCurCodeTool(CodeBuffer) then
begin
debugln(['TSourceEditorSharedValues.GetMainLinkScanner failed to find the unit codebuffer']);
debugln(['TSourceEditorSharedValues.GetMainLinkScanner failed to find the unit of ',Filename]);
exit;
end;
Result:=CodeToolBoss.CurCodeTool.Scanner;
@ -5445,11 +5445,11 @@ var
X: integer;
SynState: TSynMarkupIfdefNodeStateEx;
begin
debugln(['TSourceEditor.UpdateIfDefNodeStates CHECK ',Filename]);
//debugln(['TSourceEditor.UpdateIfDefNodeStates CHECK ',Filename]);
Scanner:=SharedValues.GetMainLinkScanner(true);
if Scanner=nil then exit;
if Scanner.ChangeStep=FLastIfDefNodeScannerStep then exit;
debugln(['TSourceEditor.UpdateIfDefNodeStates UPDATING ',Filename]);
//debugln(['TSourceEditor.UpdateIfDefNodeStates UPDATING ',Filename]);
FLastIfDefNodeScannerStep:=Scanner.ChangeStep;
EditorComponent.BeginUpdate;
try
@ -5467,7 +5467,7 @@ begin
lsdsActive: SynState:=idnEnabled;
lsdsInactive: SynState:=idnDisabled;
end;
debugln(['TSourceEditor.UpdateIfDefNodeStates y=',y,' x=',x,' ',dbgs(aDirective^.State)]);
//debugln(['TSourceEditor.UpdateIfDefNodeStates y=',y,' x=',x,' ',dbgs(aDirective^.State)]);
EditorComponent.SetIfdefNodeState(Y,X,SynState);
end;
finally