Bläddra i källkod

+ Extended is now CPU dependant (equal to bestrealtype)

carl 23 år sedan
förälder
incheckning
86ef6eec0b
1 ändrade filer med 5 tillägg och 4 borttagningar
  1. 5 4
      compiler/psystem.pas

+ 5 - 4
compiler/psystem.pas

@@ -113,7 +113,8 @@ begin
 { Normal types }
   addtype('Single',s32floattype);
   addtype('Double',s64floattype);
-  addtype('Extended',s80floattype);
+  { extended size is the best real type for the target }
+  addtype('Extended',pbestrealtype^);
   addtype('Real',s64floattype);
 {$ifdef x86}
   adddef('Comp',tfloatdef.create(s64comp));
@@ -290,8 +291,8 @@ end;
 end.
 {
   $Log$
-  Revision 1.31  2002-07-16 15:34:21  florian
-    * exit is now a syssym instead of a keyword
+  Revision 1.32  2002-07-25 17:54:24  carl
+   + Extended is now CPU dependant (equal to bestrealtype)
 
   Revision 1.30  2002/07/07 09:52:32  florian
     * powerpc target fixed, very simple units can be compiled
@@ -349,4 +350,4 @@ end.
       instead of direct comparisons of low/high values of orddefs because
       qword is a special case
 
-}
+}