Skip to content
This repository has been archived by the owner on Nov 9, 2021. It is now read-only.

Commit

Permalink
Browse files Browse the repository at this point in the history
codetools: fixed LineColIsOutSide
git-svn-id: http://svn.freepascal.org/svn/lazarus/trunk@40929 4005530d-fff6-0310-9dd1-cebe43e6787f
  • Loading branch information
mattias committed Apr 29, 2013
1 parent 2a8ac0e commit 304188a
Show file tree
Hide file tree
Showing 2 changed files with 2 additions and 1 deletion.
1 change: 1 addition & 0 deletions components/codetools/identcompletiontool.pas
Expand Up @@ -2536,6 +2536,7 @@ function TIdentCompletionTool.GatherIdentifiers(
// context behind
if (IdentEndPos<SrcLen) then begin
MoveCursorToCleanPos(IdentEndPos);
//debugln(['TIdentCompletionTool.GatherIdentifiers "',dbgstr(Src,IdentStartPos,IdentEndPos-IdentStartPos),'"']);
InFrontOfDirective:=(CurPos.StartPos<SrcLen) and (Src[CurPos.StartPos]='{')
and (Src[CurPos.StartPos+1]='$');
ReadNextAtom;
Expand Down
2 changes: 1 addition & 1 deletion components/codetools/sourcelog.pas
Expand Up @@ -781,7 +781,7 @@ function TSourceLog.LineColIsOutside(Line, Column: integer): boolean;
if (Line=FLineCount+1)
and ((Column>1) or (FSource='') or (not (FSource[FSrcLen] in [#10,#13]))) then
exit;
Result:=true;
Result:=false;
end;

function TSourceLog.LineColIsSpace(Line, Column: integer): boolean;
Expand Down

0 comments on commit 304188a

Please sign in to comment.