Преглед изворни кода

Fix compilation of heaptrc unit using fixes branch bsd compiler

Pierre Muller пре 1 година
родитељ
комит
feb7d54553
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      rtl/inc/heaptrc.pp

+ 1 - 1
rtl/inc/heaptrc.pp

@@ -1265,7 +1265,7 @@ type
   end;
   end;
 
 
 // *BSD isn't flagged for "weak"  support in 3.2.2
 // *BSD isn't flagged for "weak"  support in 3.2.2
-{$if defined(BSD) and defined (VER3_2_2)}
+{$if defined(BSD) and (FPC_FULLVERSION<30300)}
   function _dladdr(Lib:pointer; info: Pdl_info): Longint; cdecl; external LibDL name 'dladdr';
   function _dladdr(Lib:pointer; info: Pdl_info): Longint; cdecl; external LibDL name 'dladdr';
 {$else}
 {$else}
   function _dladdr(Lib:pointer; info: Pdl_info): Longint; cdecl; weakexternal LibDL name 'dladdr';
   function _dladdr(Lib:pointer; info: Pdl_info): Longint; cdecl; weakexternal LibDL name 'dladdr';