From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 26020 invoked by alias); 26 Aug 2007 22:05:54 -0000 Received: (qmail 25250 invoked by alias); 26 Aug 2007 22:05:34 -0000 Date: Sun, 26 Aug 2007 22:05:00 -0000 Message-ID: <20070826220534.25248.qmail@sourceware.org> X-Bugzilla-Reason: CC References: Subject: [Bug libfortran/33055] Runtime error in INQUIRE unit existance with -fdefault-integer-8 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: 2007-08/txt/msg01930.txt.bz2 ------- Comment #4 from jvdelisle at gcc dot gnu dot org 2007-08-26 22:05 ------- Subject: Bug 33055 Author: jvdelisle Date: Sun Aug 26 22:04:48 2007 New Revision: 127817 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=127817 Log: 2007-08-26 Jerry DeLisle PR fortran/33055 * trans-io.c (create_dummy_iostat): New function to create a unique dummy variable expression to use with IOSTAT. (gfc_trans_inquire): Use the new function to pass unit number error info to run-time library if a regular IOSTAT variable was not given. PR libfortran/33055 * io/inquire.c (inquire_via_unit): If inquiring by unit, check for an error condition from the IOSTAT variable and set EXIST to false if there was a bad unit number. Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/trans-io.c trunk/libgfortran/ChangeLog trunk/libgfortran/io/inquire.c -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33055