Browse Source

Fix bootstrapping 2.6.x

rtl/win32/sysinit.inc:
  * only import (and use) FPC_RESSTRINITTABLES if compiler supports RESSTRINITS (which the 2.6 series does not)

git-svn-id: branches/svenbarth/packages@28859 -
svenbarth 10 years ago
parent
commit
0173c830bf
1 changed files with 6 additions and 0 deletions
  1. 6 0
      rtl/win32/sysinit.inc

+ 6 - 0
rtl/win32/sysinit.inc

@@ -20,7 +20,9 @@
       InitFinalTable : record end; external name 'INITFINAL';
       ThreadvarTablesTable : record end; external name 'FPC_THREADVARTABLES';
       WideInitTables : record end; external name 'FPC_WIDEINITTABLES';
+{$ifdef FPC_HAS_RESSTRINITS}
       ResStrInitTables : record end; external name 'FPC_RESSTRINITTABLES';
+{$endif}
       ResourceStringTables : record end; external name 'FPC_RESOURCESTRINGTABLES';
       valgrind_used : boolean;external name '__fpc_valgrind';
 
@@ -52,7 +54,11 @@
         InitFinalTable : @InitFinalTable;
         ThreadvarTablesTable : @ThreadvarTablesTable;
         ResourceStringTables : @ResourceStringTables;
+{$ifdef FPC_HAS_RESSTRINITS}
         ResStrInitTables : @ResStrInitTables;
+{$else}
+        ResStrInitTables : nil;
+{$endif}
 {$ifndef FPC_WIDESTRING_EQUAL_UNICODESTRING}
         WideInitTables : @WideInitTables;
 {$endif}