Browse Source

* while not official supported, bootstrapping with 3.0.4 fixed

git-svn-id: trunk@47901 -
florian 4 years ago
parent
commit
b5725ac3ed
1 changed files with 2 additions and 0 deletions
  1. 2 0
      rtl/i386/cpu.pp

+ 2 - 0
rtl/i386/cpu.pp

@@ -69,6 +69,7 @@ unit cpu;
 
     function InterlockedCompareExchange128(var Target: Int128Rec; NewValue: Int128Rec; Comperand: Int128Rec): Int128Rec;
       begin
+{$if FPC_FULLVERSION >= 30101}
 {$ifndef FPC_PIC}      
         if _RTMSupport then
           begin
@@ -85,6 +86,7 @@ unit cpu;
           end
         else
 {$endif FPC_PIC}        
+{$endif FPC_FULLVERSION >= 30101}
           RunError(217);
       end;