فهرست منبع

* changed "crc" variable from longint to cardinal to avoid (harmless) range
check errors

git-svn-id: trunk@21257 -

Jonas Maebe 13 سال پیش
والد
کامیت
24be42d509
1فایلهای تغییر یافته به همراه2 افزوده شده و 1 حذف شده
  1. 2 1
      compiler/pgenutil.pas

+ 2 - 1
compiler/pgenutil.pas

@@ -73,7 +73,8 @@ uses
         first,
         err : boolean;
         i,
-        gencount,crc : longint;
+        gencount : longint;
+        crc : cardinal;
         genericdef,def : tstoreddef;
         generictype : ttypesym;
         genericdeflist : TFPObjectList;