mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-18 05:49:23 +02:00
* silence another warning from r30449
git-svn-id: trunk@30469 -
This commit is contained in:
parent
5f1553c1e7
commit
5d8483185f
@ -412,6 +412,7 @@ implementation
|
|||||||
|
|
||||||
{$push}
|
{$push}
|
||||||
{$warn 6018 off}
|
{$warn 6018 off}
|
||||||
|
{$warn 4044 off}
|
||||||
{ Extend the temp }
|
{ Extend the temp }
|
||||||
if direction=-1 then
|
if direction=-1 then
|
||||||
begin
|
begin
|
||||||
|
Loading…
Reference in New Issue
Block a user