Kaynağa Gözat

Fix compilation with release compiler

Pierre Muller 1 hafta önce
ebeveyn
işleme
9c3be3351f
1 değiştirilmiş dosya ile 4 ekleme ve 0 silme
  1. 4 0
      rtl/objpas/classes/classes.inc

+ 4 - 0
rtl/objpas/classes/classes.inc

@@ -909,6 +909,9 @@ begin
     as volatile, so the access won't be optimized away by the compiler. (KB) }
     as volatile, so the access won't be optimized away by the compiler. (KB) }
   for i:=1 to aIterations do
   for i:=1 to aIterations do
     begin
     begin
+    {$if FPC_FULLVERSION<30300}
+    Inc(SpinWaitDummy); // SpinWaitDummy *MUST* be global
+    {$else}
     {$IF defined(CPUX86_64) or Defined(CPUI386)}
     {$IF defined(CPUX86_64) or Defined(CPUI386)}
     fpc_x86_pause;
     fpc_x86_pause;
     {$ELSEIF defined(CPUARM)}
     {$ELSEIF defined(CPUARM)}
@@ -918,6 +921,7 @@ begin
     {$ELSE}
     {$ELSE}
     Inc(SpinWaitDummy); // SpinWaitDummy *MUST* be global
     Inc(SpinWaitDummy); // SpinWaitDummy *MUST* be global
     {$ENDIF}
     {$ENDIF}
+    {$ifend}
     end;
     end;
 end;
 end;