This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/17175] set_exponent breaks with integer*8 exponent
- From: "tobi at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 26 Aug 2004 16:05:33 -0000
- Subject: [Bug fortran/17175] set_exponent breaks with integer*8 exponent
- References: <20040824203618.17175.dje@gcc.gnu.org>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Additional Comments From tobi at gcc dot gnu dot org 2004-08-26 16:05 -------
Indeed:
[tobi@marktplatz tests]$ cat setexp.f90
x = 1.
x = set_exponent (x, 25_4)
x = set_exponent (x, 25_8)
end
[tobi@marktplatz tests]$ gfortran setexp.f90 -fdump-parse-tree -S | grep exponent_4
ASSIGN x __set_exponent_4_4[[((x) (25))]]
ASSIGN x __set_exponent_4_8[[((x) (25_8))]]
[tobi@marktplatz tests]$ grep exponent setexp.s
call _gfortran_set_exponent_r4
call _gfortran_set_exponent_r4
I.e. the information is lost when choosing the intrinsic.
--
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Ever Confirmed| |1
Last reconfirmed|0000-00-00 00:00:00 |2004-08-26 16:05:22
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17175