From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 13582 invoked by alias); 13 Mar 2005 19:05:43 -0000 Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-bugs-owner@gcc.gnu.org Received: (qmail 13563 invoked by uid 48); 13 Mar 2005 19:05:40 -0000 Date: Sun, 13 Mar 2005 19:05:00 -0000 Message-ID: <20050313190540.13562.qmail@sourceware.org> From: "tobi at gcc dot gnu dot org" To: gcc-bugs@gcc.gnu.org In-Reply-To: <20041015213354.18026.anlauf@hep.tu-darmstadt.de> References: <20041015213354.18026.anlauf@hep.tu-darmstadt.de> Reply-To: gcc-bugzilla@gcc.gnu.org Subject: [Bug fortran/18026] boz initialization of REALs fails X-Bugzilla-Reason: CC X-SW-Source: 2005-03/txt/msg01637.txt.bz2 List-Id: ------- Additional Comments From tobi at gcc dot gnu dot org 2005-03-13 19:05 ------- While the compile-time error has disappeared, we now give the following incorrect output at runtime: [tobi@marktplatz tests]$ ./a.out 9.218868437227405E+018 1.844449227389587E+019 [tobi@marktplatz tests]$ The following testcase gives the expected result, though: PROGRAM GFCBUG19 integer*8 infi, nani DOUBLE PRECISION inf, nan equivalence (infi, inf), (nani, nan) !c IEEE exceptional values on Intel x87 DATA infi / Z'7FF0000000000000' / DATA nani / Z'FFF8000000000000' / print *, inf, nan END [tobi@marktplatz tests]$ ./a.out +Infinity NaN [tobi@marktplatz tests]$ -- What |Removed |Added ---------------------------------------------------------------------------- Summary|gfortran: regression w.r.t. |boz initialization of REALs |g77, lacks -ftypeless-boz |fails http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18026