From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 20262 invoked by alias); 8 Aug 2002 11:56:05 -0000 Mailing-List: contact gcc-prs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-prs-owner@gcc.gnu.org Received: (qmail 20243 invoked by uid 71); 8 Aug 2002 11:56:04 -0000 Resent-Date: 8 Aug 2002 11:56:04 -0000 Resent-Message-ID: <20020808115604.20242.qmail@sources.redhat.com> Resent-From: gcc-gnats@gcc.gnu.org (GNATS Filer) Resent-To: nobody@gcc.gnu.org Resent-Cc: gcc-prs@gcc.gnu.org, gcc-bugs@gcc.gnu.org Resent-Reply-To: gcc-gnats@gcc.gnu.org, rguenth@tat.physik.uni-tuebingen.de Received: (qmail 14221 invoked by uid 61); 8 Aug 2002 11:50:36 -0000 Message-Id: <20020808115036.14220.qmail@sources.redhat.com> Date: Thu, 08 Aug 2002 05:06:00 -0000 From: rguenth@tat.physik.uni-tuebingen.de Reply-To: rguenth@tat.physik.uni-tuebingen.de To: gcc-gnats@gcc.gnu.org X-Send-Pr-Version: gnatsweb-2.9.3 (1.1.1.1.2.31) Subject: fortran/7541: DATA statement for double precision variables does not work X-SW-Source: 2002-08/txt/msg00164.txt.bz2 List-Id: >Number: 7541 >Category: fortran >Synopsis: DATA statement for double precision variables does not work >Confidential: no >Severity: critical >Priority: medium >Responsible: unassigned >State: open >Class: rejects-legal >Submitter-Id: net >Arrival-Date: Thu Aug 08 04:56:02 PDT 2002 >Closed-Date: >Last-Modified: >Originator: rguenth@tat.physik.uni-tuebingen.de >Release: g77 version 3.0.5 20020403 (prerelease) (Fortran Frontend version 0.5.26 20020403 (prerelease)) >Organization: >Environment: SuSE linux 7.2, custom gcc 3.0.5 >Description: g77 cannot compile NAG library due to unability to handle f.i. DOUBLE PRECISION FUNCTION X02AHF(X) DOUBLE PRECISION X DOUBLE PRECISION X02CON DATA X02CON /Z'4690000000000000' / X02AHF = X02CON RETURN END g77 produces bellatrix:/tmp$ g77 -c x02ahft.f x02ahft.f: In function `x02ahf': x02ahft.f:13: DATA X02CON /Z'4690000000000000' / ^ Integer at (^) too large the code compiles ok with intel fortran and lahey fortran. x02ahft.f from NAG library is attached. >How-To-Repeat: g77 -c x02ahft.f >Fix: >Release-Note: >Audit-Trail: >Unformatted: ----gnatsweb-attachment---- Content-Type: application/octet-stream; name="x02ahft.f" Content-Transfer-Encoding: base64 Content-Disposition: attachment; filename="x02ahft.f" ICAgICAgRE9VQkxFIFBSRUNJU0lPTiBGVU5DVElPTiBYMDJBSEYoWCkKQyAgICAgTUFSSyA5IFJF TEVBU0UuIE5BRyBDT1BZUklHSFQgMTk4MS4KQyAgICAgTUFSSyAxMS41KEY3NykgUkVWSVNFRC4g KFNFUFQgMTk4NS4pCkMKQyAgICAgKiBNQVhJTVVNIEFSR1VNRU5UIEZPUiBTSU4gQU5EIENPUyAq CkMgICAgIFJFVFVSTlMgVEhFIExBUkdFU1QgUE9TSVRJVkUgUkVBTCBOVU1CRVIgTUFYU0MgU1VD SCBUSEFUCkMgICAgIFNJTihNQVhTQykgQU5EIENPUyhNQVhTQykgQ0FOIEJFIFNVQ0NFU1NGVUxM WSBDT01QVVRFRApDICAgICBCWSBUSEUgQ09NUElMRVIgU1VQUExJRUQgU0lOIEFORCBDT1MgUk9V VElORVMuCkMKQyAgICAgLi4gU2NhbGFyIEFyZ3VtZW50cyAuLgogICAgICBET1VCTEUgUFJFQ0lT SU9OICAgICAgICAgICAgICAgICBYCiAgICAgIERPVUJMRSBQUkVDSVNJT04gWDAyQ09OCiAgICAg IERBVEEgWDAyQ09OIC9aJzQ2OTAwMDAwMDAwMDAwMDAnIC8KQyAgICAgLi4gRXhlY3V0YWJsZSBT dGF0ZW1lbnRzIC4uCiAgICAgIFgwMkFIRiA9IFgwMkNPTgogICAgICBSRVRVUk4KICAgICAgRU5E Cg==