From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 11323 invoked by alias); 26 Apr 2011 17:37:46 -0000 Received: (qmail 11270 invoked by uid 22791); 26 Apr 2011 17:37:45 -0000 X-SWARE-Spam-Status: No, hits=-2.7 required=5.0 tests=ALL_TRUSTED,AWL,BAYES_00 X-Spam-Check-By: sourceware.org Received: from localhost (HELO gcc.gnu.org) (127.0.0.1) by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Tue, 26 Apr 2011 17:37:31 +0000 From: "ro at CeBiTec dot Uni-Bielefeld.DE" To: gcc-bugs@gcc.gnu.org Subject: [Bug fortran/48438] Several gfortran tests FAIL on Tru64 UNIX X-Bugzilla-Reason: CC X-Bugzilla-Type: changed X-Bugzilla-Watch-Reason: None X-Bugzilla-Product: gcc X-Bugzilla-Component: fortran X-Bugzilla-Keywords: X-Bugzilla-Severity: normal X-Bugzilla-Who: ro at CeBiTec dot Uni-Bielefeld.DE X-Bugzilla-Status: UNCONFIRMED X-Bugzilla-Priority: P3 X-Bugzilla-Assigned-To: unassigned at gcc dot gnu.org X-Bugzilla-Target-Milestone: --- X-Bugzilla-Changed-Fields: Message-ID: In-Reply-To: References: X-Bugzilla-URL: http://gcc.gnu.org/bugzilla/ Auto-Submitted: auto-generated Content-Type: text/plain; charset="UTF-8" MIME-Version: 1.0 Date: Tue, 26 Apr 2011 17:37:00 -0000 Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Archive: List-Post: List-Help: Sender: gcc-bugs-owner@gcc.gnu.org X-SW-Source: 2011-04/txt/msg02655.txt.bz2 http://gcc.gnu.org/bugzilla/show_bug.cgi?id=48438 --- Comment #2 from ro at CeBiTec dot Uni-Bielefeld.DE 2011-04-26 17:36:51 UTC --- > - large_real_kind_2.F90 > Fails for CTEST_POWER(0.0, 5.4), which is: > abs(0.0**5.4 - 0.0**5.4)/(0.0**5.4) > eps > xxxxxxxx 88888888 88888888 > where "x" is complex(kind=16) ("selected_real_kind (precision (0.0_8) + 1)") > and "8" is complex(8). > The numeric expression gives 0.0/0.0 = NaN - and "NaN > eps" gives > here FALSE - but on Tru64 seemingly SIGABRT? No, the SIGFPE already happens in the cpow (0.0, 0.0, 5.4, 0.0) call. If I compile with -mieee instead, I get SIGFPE for 75 CTEST_POWER (0.0,1.0) complex(3) states: cpow(), cpowf() sqrt(a**2 + b**2) > overflow max_float cpow(), cpowf() c/2 * ln(a**2 + b**2) > overflow max_float cpow(), cpowf() c/2 * ln(a**2 + b**2) - overflow (d * atan2(b,c)) > max_float ____________________________________________________________________ __________________________________________________________________ Value Name Data Type Hexadecimal Value Decimal Value __________________________________________________________________ max_float F_FLOAT FFFF7FFF 1.701411e38 G_FLOAT FFFFFFFFFFFF7 8.988465674311579e307 S_FLOAT 7F7FFFFF 3.402823e38 T_FLOAT 7FEFFFFFFFFFFFFF F_FLOAT and G_FLOAT is the VAX single resp. double format, while S_FLOAT and T_FLOAT are IEEE single and double. Rainer