mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-16 09:39:09 +02:00
* Do not use C style assignments, because make fails on commandline, since the option -Sc is not set
git-svn-id: trunk@34715 -
This commit is contained in:
parent
724765c335
commit
78dc85c389
@ -374,7 +374,7 @@ begin
|
||||
CodeBuf.LineColToPosition(XY.Y,XY.X,p);
|
||||
if p>0 then begin
|
||||
StartPos:=GetIdentStartPosition(CodeBuf.Source,p);
|
||||
XY.X += StartPos-p;
|
||||
XY.X := XY.X + StartPos-p;
|
||||
end;
|
||||
if not CodeToolBoss.ExtractProcedureHeader(CodeBuf,XY.X,XY.Y,Attributes,Value)
|
||||
then begin
|
||||
|
Loading…
Reference in New Issue
Block a user