Explorar o código

* Use extended for bestreal type if GENERIC_CPU is defined

git-svn-id: trunk@17954 -
pierre %!s(int64=14) %!d(string=hai) anos
pai
achega
2f7a57fcab
Modificáronse 1 ficheiros con 4 adicións e 0 borrados
  1. 4 0
      compiler/constexp.pas

+ 4 - 0
compiler/constexp.pas

@@ -57,11 +57,15 @@ var   internalerror:errorproc;
 
 
 {Same issue, avoid dependency on cpuinfo because the cpu directory isn't
 {Same issue, avoid dependency on cpuinfo because the cpu directory isn't
  searched during utils building.}
  searched during utils building.}
+{$ifdef GENERIC_CPU}
+type  bestreal=extended;
+{$else}
 {$ifdef x86}
 {$ifdef x86}
 type  bestreal=extended;
 type  bestreal=extended;
 {$else}
 {$else}
 type  bestreal=double;
 type  bestreal=double;
 {$endif}
 {$endif}
+{$endif}
 
 
 operator := (const u:qword):Tconstexprint;inline;
 operator := (const u:qword):Tconstexprint;inline;
 operator := (const s:int64):Tconstexprint;inline;
 operator := (const s:int64):Tconstexprint;inline;