Преглед изворни кода

* EInOutError.ErrorCode changed from Longint to Integer (16-bit Delphi 1
compatibility)

git-svn-id: trunk@27044 -

nickysn пре 11 година
родитељ
комит
ca451988a8
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      rtl/objpas/sysutils/sysutilh.inc

+ 1 - 1
rtl/objpas/sysutils/sysutilh.inc

@@ -156,7 +156,7 @@ type
    { Run-time and I/O Errors }
    EInOutError = class(Exception)
      public
-       ErrorCode : Longint;
+       ErrorCode : Integer;
    end;
 
    EHeapMemoryError = class(Exception)