------- Comment #6 from sgk at troutmask dot apl dot washington dot edu 2005-11-15 21:49 ------- Subject: Re: [gfortran, 4.1.0 regression] Arithmetic overflow during compilation
> Comment #5 from martin > ~/tmp>gfortran -c -fdump-parse-tree huge.f90 > >Namespace: A-Z: (UNKNOWN 0) >procedure name = mod1 >symtree: gndp_max Ambig 0 >symbol gndp_max (REAL 8)(PARAMETER UNKNOWN-INTENT UNKNOWN-ACCESS UNKNOWN-PROC) >value: 1.79769313486232e308_8 > On amd64-*-freebsd. Namespace: A-Z: (UNKNOWN 0) procedure name = mod1 symtree: gndp_max Ambig 0 symbol gndp_max (REAL 8)(PARAMETER UNKNOWN-INTENT UNKNOWN-ACCESS UNKNOWN-PROC) value: 1.7976931348623157e308_8 >procedure name = mod2 >symtree: gndp_max Ambig 0 >symbol gndp_max (REAL 8)(PARAMETER UNKNOWN-INTENT UNKNOWN-ACCESS > UNKNOWN-PROC USE-ASSOC) >value: 1.79769313486232e308_8 Good, you're reading in what was written to the module. > 6 'gndp_max' 'mod1' 1 ((PARAMETER UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN) ( > REAL 8 ()) 0 0 () (CONSTANT (REAL 8 ()) 0 '[EMAIL PROTECTED]') () 0 () > ()) 6 'gndp_max' 'mod1' 1 ((PARAMETER UNKNOWN-INTENT UNKNOWN-PROC UNKNOWN) ( REAL 8 ()) 0 0 () (CONSTANT (REAL 8 ()) 0 '[EMAIL PROTECTED]') () 0 () Hmmm, this doesn't look good. You're getting 1 fewer digits than I. I'll check what happens on i386-*-freebsd. -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=24875