* changed TResStrInitTable.Count and TWStrInitTablesTable.Count to nativeint

git-svn-id: trunk@26921 -

compiler/ngenutil.pas

@@ -805,7 +805,7 @@ implementation
          inc(count);
        end;
       { Insert TableCount at start }
-      hlist.insert(Tai_const.Create_32bit(count));
+      hlist.insert(Tai_const.Create_pint(count));
       { insert in data segment }
       maybe_new_object_file(current_asmdata.asmlists[al_globals]);
       new_section(current_asmdata.asmlists[al_globals],sec_data,tablename,sizeof(pint));

rtl/objpas/objpas.pp

@@ -311,7 +311,7 @@ Type
    end;
 
    TResStrInitTable = packed record
-     Count: longint;
+     Count: {$ifdef VER2_6}longint{$else}nativeint{$endif};
      Tables: packed array[1..{$ifdef cpu16}8191{$else cpu16}32767{$endif cpu16}] of PResStrInitEntry;
    end;
 

rtl/win/syswin.inc

@@ -637,7 +637,7 @@ type
 
   PWStrInitTablesTable = ^TWStrInitTablesTable;
   TWStrInitTablesTable = packed record
-    count  : longint;
+    count  : {$ifdef VER2_6}longint{$else}nativeint{$endif};
     tables : packed array [1..32767] of PWStrInitEntry;
   end;