[Bug libfortran/34141] New: gfortran.fortran-torture/execute/intrinsic_set_exponent.f90 fails on Intel Darwin9

[Bug libfortran/34141] New: gfortran.fortran-torture/execute/intrinsic_set_exponent.f90 fails on Intel Darwin9

[dominiq at lps dot ens dot fr]

gfortran.fortran-torture/execute/intrinsic_set_exponent.f90 fails on Intel
Darwin9 at all level of optimization. The following reduced test case shows the
origin of the failure (EXPONENT for real(4), but not for real(8)):

!Program to test SET_EXPONENT intrinsic function.

  real*4 x,y
  integer*4 i,n
  equivalence(x, i)

  n = -125
  x = 1024.0
  y = set_exponent (x, n)
  print *, y, n, exponent(y)

  n = -126
  y = set_exponent (x, n)
  print *, y, n, exponent(y)

  n = -148
  y = set_exponent (x, n)
  print *, y, n, exponent(y)

  n = -149
  y = set_exponent (x, n)
  print *, y, n, exponent(y)
  if ((y .ne. 0.0) .and. (exponent (y) .ne. n)) call abort()

end

which yields:

  1.17549435E-38        -125        -125
  5.87747175E-39        -126        -127
  1.40129846E-45        -148        -149
   0.0000000            -149           0

where the result of exponent is off by -1 for denormalized numbers (the value
of 'y' is correct).  This is certainly due to some changes in the OS library,
but the bug may also come from the implementation of exponent in
libgfortran(?).


-- 
           Summary: gfortran.fortran-
                    torture/execute/intrinsic_set_exponent.f90 fails on
                    Intel Darwin9
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: libfortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: dominiq at lps dot ens dot fr
 GCC build triplet: i686-apple-darwin9
  GCC host triplet: i686-apple-darwin9
GCC target triplet: i686-apple-darwin9


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

[Bug libfortran/34141] gfortran.fortran-torture/execute/intrinsic_set_exponent.f90 fails on Intel Darwin9

[fxcoudert at gcc dot gnu dot org]

------- Comment #1 from fxcoudert at gcc dot gnu dot org  2007-11-19 16:54 -------
EXPONENT is implemented in libgfortran with frexpf. Can you tell us what the
following gives:

int main() {
  float x = 5.87747175E-39;
  int i;
  __builtin_frexpf (x, &i);
  __builtin_printf ("%d\n", i);
}


-- 

fxcoudert at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |fxcoudert at gcc dot gnu dot
                   |                            |org


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

[Bug libfortran/34141] gfortran.fortran-torture/execute/intrinsic_set_exponent.f90 fails on Intel Darwin9

[dominiq at lps dot ens dot fr]

------- Comment #2 from dominiq at lps dot ens dot fr  2007-11-19 17:12 -------
Subject: Re: 
 gfortran.fortran-torture/execute/intrinsic_set_exponent.f90 fails on Intel
 Darwin9

> Can you tell us what the following gives:

-127


-- 


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

[Bug target/34141] gfortran.fortran-torture/execute/intrinsic_set_exponent.f90 fails on Intel Darwin9

[fxcoudert at gcc dot gnu dot org]

------- Comment #3 from fxcoudert at gcc dot gnu dot org  2007-11-19 17:18 -------
OK, so you need to file a bug report to Apple. We probably should consider
XFAILing that testcase.


-- 

fxcoudert at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
          Component|libfortran                  |target
     Ever Confirmed|0                           |1
   Last reconfirmed|0000-00-00 00:00:00         |2007-11-19 17:18:04
               date|                            |


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

[Bug target/34141] gfortran.fortran-torture/execute/intrinsic_set_exponent.f90 fails on Intel Darwin9

[dominiq at lps dot ens dot fr]

------- Comment #4 from dominiq at lps dot ens dot fr  2007-11-19 22:19 -------
> OK, so you need to file a bug report to Apple.

I'll do it as soon as I have checked what's happen on PPC. I have justa
question: in which library is frexpf?


-- 


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

[Bug target/34141] gfortran.fortran-torture/execute/intrinsic_set_exponent.f90 fails on Intel Darwin9

[dominiq at lps dot ens dot fr]

------- Comment #5 from dominiq at lps dot ens dot fr  2007-11-21 17:32 -------
The bug is not present in PPC OSX 10.5.1 (at least the C code in comment #1,
returns -126).


-- 


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

[Bug target/34141] gfortran.fortran-torture/execute/intrinsic_set_exponent.f90 fails on Intel Darwin9

[dominiq at lps dot ens dot fr]

------- Comment #6 from dominiq at lps dot ens dot fr  2007-11-21 22:42 -------
I filled a bug report to Apple: radar #5610291.


-- 


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

[Bug target/34141] gfortran.fortran-torture/execute/intrinsic_set_exponent.f90 fails on Intel Darwin9

[dominiq at lps dot ens dot fr]

------- Comment #7 from dominiq at lps dot ens dot fr  2008-02-12 20:18 -------
Fixed in OSX 10.5.2.


-- 


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

[Bug target/34141] gfortran.fortran-torture/execute/intrinsic_set_exponent.f90 fails on Intel Darwin9

[jvdelisle at gcc dot gnu dot org]

------- Comment #8 from jvdelisle at gcc dot gnu dot org  2008-02-13 03:48 -------
Can this be closed then?


-- 


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

[Bug target/34141] gfortran.fortran-torture/execute/intrinsic_set_exponent.f90 fails on Intel Darwin9

[dominiq at lps dot ens dot fr]

------- Comment #9 from dominiq at lps dot ens dot fr  2008-02-13 07:10 -------
Subject: Re: 
 gfortran.fortran-torture/execute/intrinsic_set_exponent.f90 fails on Intel
 Darwin9

> Can this be closed then?

I think so.


-- 


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

[Bug target/34141] gfortran.fortran-torture/execute/intrinsic_set_exponent.f90 fails on Intel Darwin9

[fxcoudert at gcc dot gnu dot org]

------- Comment #10 from fxcoudert at gcc dot gnu dot org  2008-02-13 09:02 -------
Closing as INVALID, this is an Apple bug in 10.5.0 and 10.5.1.


-- 

fxcoudert at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |RESOLVED
         Resolution|                            |INVALID


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