This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: gfortran.dg/large_real_kind_1.f90
On Wed, Sep 28, 2005 at 11:11:02AM -0700, Steve Kargl wrote:
> Can you compile the program that follows my .sig with -fdump-tree-original
> and report the values? Note, please change the definition of the
> integer kb to be whatever the kind type parameter for IBM extended
> double is.
The following is virgin mainline output
ba = 2;
bb = 2;
bc = 2;
pa = 24;
pb = 53;
pc = 106;
exa = 128;
exb = 1024;
exc = 1024;
ema = -125;
emb = -1021;
emc = -968;
a = 1.1920928955078125e-7;
b = 2.220446049250313080847263336181640625e-16;
c = 2.46519032881566189191165176650870696772877010971569688991e-32;
a = 1.17549435082228750796873653722224567781866555677208752151e-38;
b = 2.22507385850720138309023271733240406421921598046233183055e-308;
c = 2.00416836000897277799610805135016204789434630240391191271e-292;
a = 3.4028234663852885981170418348451692544e+38;
b = 1.79769313486231570814527423731704356798070567525844996599e+308;
c = 1.79769313486231590772930519078900257533932577448945220669e+308;
pa = 6;
pb = 15;
pc = 31;
pa = 37;
pb = 307;
pc = 291;
With my patch, the difference is:
--- ldbl.f90.t02.original 2005-09-29 08:49:43.444963217 +0930
+++ ../gcc64-curr/ldbl.f90.t02.original 2005-09-29 08:51:42.887062446 +0930
@@ -36,7 +36,7 @@
c = 2.00416836000897277799610805135016204789434630240391191271e-292;
a = 3.4028234663852885981170418348451692544e+38;
b = 1.79769313486231570814527423731704356798070567525844996599e+308;
- c = 1.79769313486231590772930519078900257533932577448945220669e+308;
+ c = 1.79769313486231580793728971405301199252069012264752390332e+308;
pa = 6;
pb = 15;
pc = 31;
--
Alan Modra
IBM OzLabs - Linux Technology Centre