* silence another warning from r30449

git-svn-id: trunk@30469 -
This commit is contained in:
Jonas Maebe 2015-04-06 16:42:27 +00:00
parent 5f1553c1e7
commit 5d8483185f

View File

@ -412,6 +412,7 @@ implementation
{$push}
{$warn 6018 off}
{$warn 4044 off}
{ Extend the temp }
if direction=-1 then
begin