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

* Fix bug ID #34535, small optimization

Browse Source 
git-svn-id: trunk@40292 -
This commit is contained in:
michael 2018-11-12 12:28:31 +00:00
parent 895139f332
commit 9b39033ed4
1 changed files with 1 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
packages/fcl-stl/src/gdeque.pp
View File

@ -72,10 +72,7 @@ end;
function TDeque.IsEmpty():boolean;inline;
begin
if Size()=0 then
IsEmpty:=true
else
IsEmpty:=false;
IsEmpty:=Size()=0;
end;
procedure TDeque.PushBack(value:T);inline;