diff options
-rw-r--r-- | tests/test/tforin8.pp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/test/tforin8.pp b/tests/test/tforin8.pp index 85376a9542..e91cb516d0 100644 --- a/tests/test/tforin8.pp +++ b/tests/test/tforin8.pp @@ -55,7 +55,7 @@ var begin List := TMyList.Create; for i in List do - WriteLn(Integer(i)); + WriteLn(PtrUInt(i)); List := nil; end. |