From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 19616 invoked by alias); 25 Dec 2008 19:47:11 -0000 Received: (qmail 19467 invoked by uid 48); 25 Dec 2008 19:45:49 -0000 Date: Thu, 25 Dec 2008 19:47:00 -0000 Message-ID: <20081225194549.19466.qmail@sourceware.org> X-Bugzilla-Reason: CC References: Subject: [Bug fortran/38439] I/O PD edit descriptor inconsistency In-Reply-To: Reply-To: gcc-bugzilla@gcc.gnu.org To: gcc-bugs@gcc.gnu.org From: "jvdelisle at gcc dot gnu dot org" 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: 2008-12/txt/msg02301.txt.bz2 ------- Comment #2 from jvdelisle at gcc dot gnu dot org 2008-12-25 19:45 ------- g77 runtime accepts this and prints: character(len=25) :: str str = '(1PD24.15E4)' write (*,'(1PD24.15E4)') 1.0d0 WRITE (*,str) 1.0d0 end $ g77 pr38439.f $ ./a.out 1.000000000000000E+00 1.000000000000000E+00 gfortran 4.4: $ gfc -std=legacy pr38439.f pr38439.f:3.72: write (*,'(1PD24.15E4)') 1.0d0 1 Warning: Period required in format specifier at (1) [jerry@lenova pr38439]$ ./a.out 1.000000000000000D+0000 1.000000000000000D+0000 I think I will make the run-time consistent with the compile as far as error messages, giving a runtime warning if not -std-legacy. The 'D' exponent character is different from g77, but is standard conforming. -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38439