[Bug fortran/28276] New: EXPONENT() broken for real constants

[anlauf at gmx dot de]

Hi *,

there is a nasty bug with EXPONENT():
EXPONENT(1.0) evaluates to 0 (which is wrong), while
real :: a=1.0; EXPONENT(a) evaluates to 1 (which is correct).

For more details and a further example see the attached
code sample.

Cheers,
-ha


-- 
           Summary: EXPONENT() broken for real constants
           Product: gcc
           Version: 4.2.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: anlauf at gmx dot de
  GCC host triplet: i686-pc-linux-gnu


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=28276