paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 12:09:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

* size of the DrawnList buffer moved to a local variable, to avoid repeated code and repeated calculations

Browse Source 
git-svn-id: trunk@40975 -
This commit is contained in:
nickysn 2019-01-21 16:24:46 +00:00
parent 6bb104a16d
commit c26df36bc5
1 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
packages/graph/src/inc/fills.inc
View File

@ -433,10 +433,11 @@ var
Cont : Boolean; Cont : Boolean;
BackupColor : ColorType; BackupColor : ColorType;
x1, x2, prevy: smallint; x1, x2, prevy: smallint;
SBufferSize: SizeUInt; SBufferSize, DrawnListSize: SizeUInt;
Begin Begin
If (x<0) Or (y<0) Or If (x<0) Or (y<0) Or
(x>ViewWidth) Or (y>ViewHeight) then Exit; (x>ViewWidth) Or (y>ViewHeight) then Exit;
DrawnListSize:=sizeof(PFloodLine)*((ViewHeight div YResDiv) + 1);
{ MaxX is based on zero index } { MaxX is based on zero index }
{$ifdef FPC_GRAPH_SUPPORTS_TRUECOLOR} {$ifdef FPC_GRAPH_SUPPORTS_TRUECOLOR}
if MaxColor > 65536 then if MaxColor > 65536 then
@ -448,7 +449,7 @@ var
s1:=nil; s1:=nil;
s2:=nil; s2:=nil;
s3:=nil; s3:=nil;
GetMem(DrawnList,sizeof(PFloodLine)*((ViewHeight div YResDiv) + 1)); GetMem(DrawnList,DrawnListSize);
GetMem (s1,SBufferSize); GetMem (s1,SBufferSize);
GetMem (s2,SBufferSize); GetMem (s2,SBufferSize);
GetMem (s3,SBufferSize); GetMem (s3,SBufferSize);
@ -462,10 +463,10 @@ var
if assigned(s3) then if assigned(s3) then
System.FreeMem (s3,SBufferSize); System.FreeMem (s3,SBufferSize);
if assigned(DrawnList) then if assigned(DrawnList) then
System.FreeMem(DrawnList,sizeof(PFloodLine)*((ViewHeight div YResDiv) + 1)); System.FreeMem(DrawnList,DrawnListSize);
exit; exit;
end; end;
FillChar(DrawnList^,sizeof(PFloodLine)*((ViewHeight div YResDiv) + 1),0); FillChar(DrawnList^,DrawnListSize,0);
{ init prevy } { init prevy }
prevy := 32767; prevy := 32767;
{ Save current drawing color } { Save current drawing color }
@ -603,7 +604,7 @@ var
System.FreeMem (s2,SBufferSize); System.FreeMem (s2,SBufferSize);
System.FreeMem (s3,SBufferSize); System.FreeMem (s3,SBufferSize);
CleanUpDrawnList; CleanUpDrawnList;
System.FreeMem(DrawnList,sizeof(PFloodLine)*((ViewHeight div YResDiv) + 1)); System.FreeMem(DrawnList,DrawnListSize);
CurrentColor := BackUpColor; CurrentColor := BackUpColor;
End; End;