public inbox for gcc-bugs@sourceware.org help / color / mirror / Atom feed
* [Bug libfortran/14872] New: [gfortran] Variables used for REC= in READ / WRITE always case run-time error @ 2004-04-07 5:38 bdavis9659 at comcast dot net 2004-04-07 5:40 ` [Bug fortran/14872] " bdavis9659 at comcast dot net ` (3 more replies) 0 siblings, 4 replies; 5+ messages in thread From: bdavis9659 at comcast dot net @ 2004-04-07 5:38 UTC (permalink / raw) To: gcc-bugs This problem is from FM410.FOR and FM413.FOR of the NIST tests. ! demonstrates using a variable for REC in READ/WRITE implicit none integer i,j,irec OPEN(UNIT=10,ACCESS='DIRECT',RECL=80) DO I=1,10 WRITE(UNIT=10,REC=i)i END DO STOP END $ gfortran y.f $ ./a.out At line 6 of file y.f Fortran runtime error: Record number must be positive from g77: $ g77 y.f $ ./a.out GNU Fortran 95 (GCC 3.5-tree-ssa 20040405 (merged 20040331)) from y.f.t03.original: _gfortran_filename = "y.f"; _gfortran_line = 6; _gfortran_ioparm.unit = 10; _gfortran_ioparm.rec = &i; ^^^^^^^^^ wrong, run time lib expects a value _gfortran_st_write (); _gfortran_transfer_integer (&i, 4); _gfortran_st_write_done (); i = i + 1; so this looks like a front end issue. note that direct access reads/writes work fine with a constant REC, like: WRITE(10,REC=100) -- Summary: [gfortran] Variables used for REC= in READ / WRITE always case run-time error Product: gcc Version: tree-ssa Status: UNCONFIRMED Severity: normal Priority: P2 Component: libfortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: bdavis9659 at comcast dot net CC: gcc-bugs at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=14872 ^ permalink raw reply [flat|nested] 5+ messages in thread
* [Bug fortran/14872] [gfortran] Variables used for REC= in READ / WRITE always case run-time error 2004-04-07 5:38 [Bug libfortran/14872] New: [gfortran] Variables used for REC= in READ / WRITE always case run-time error bdavis9659 at comcast dot net @ 2004-04-07 5:40 ` bdavis9659 at comcast dot net 2004-04-08 18:03 ` pinskia at gcc dot gnu dot org ` (2 subsequent siblings) 3 siblings, 0 replies; 5+ messages in thread From: bdavis9659 at comcast dot net @ 2004-04-07 5:40 UTC (permalink / raw) To: gcc-bugs -- What |Removed |Added ---------------------------------------------------------------------------- Component|libfortran |fortran http://gcc.gnu.org/bugzilla/show_bug.cgi?id=14872 ^ permalink raw reply [flat|nested] 5+ messages in thread
* [Bug fortran/14872] [gfortran] Variables used for REC= in READ / WRITE always case run-time error 2004-04-07 5:38 [Bug libfortran/14872] New: [gfortran] Variables used for REC= in READ / WRITE always case run-time error bdavis9659 at comcast dot net 2004-04-07 5:40 ` [Bug fortran/14872] " bdavis9659 at comcast dot net @ 2004-04-08 18:03 ` pinskia at gcc dot gnu dot org 2004-04-11 16:07 ` cvs-commit at gcc dot gnu dot org 2004-04-11 17:19 ` pinskia at gcc dot gnu dot org 3 siblings, 0 replies; 5+ messages in thread From: pinskia at gcc dot gnu dot org @ 2004-04-08 18:03 UTC (permalink / raw) To: gcc-bugs ------- Additional Comments From pinskia at gcc dot gnu dot org 2004-04-08 18:03 ------- Patch here: <http://gcc.gnu.org/ml/fortran/2004-04/msg00067.html>. Confirmed. -- What |Removed |Added ---------------------------------------------------------------------------- Status|UNCONFIRMED |NEW Ever Confirmed| |1 Keywords| |patch Last reconfirmed|0000-00-00 00:00:00 |2004-04-08 18:03:18 date| | Target Milestone|--- |tree-ssa http://gcc.gnu.org/bugzilla/show_bug.cgi?id=14872 ^ permalink raw reply [flat|nested] 5+ messages in thread
* [Bug fortran/14872] [gfortran] Variables used for REC= in READ / WRITE always case run-time error 2004-04-07 5:38 [Bug libfortran/14872] New: [gfortran] Variables used for REC= in READ / WRITE always case run-time error bdavis9659 at comcast dot net 2004-04-07 5:40 ` [Bug fortran/14872] " bdavis9659 at comcast dot net 2004-04-08 18:03 ` pinskia at gcc dot gnu dot org @ 2004-04-11 16:07 ` cvs-commit at gcc dot gnu dot org 2004-04-11 17:19 ` pinskia at gcc dot gnu dot org 3 siblings, 0 replies; 5+ messages in thread From: cvs-commit at gcc dot gnu dot org @ 2004-04-11 16:07 UTC (permalink / raw) To: gcc-bugs ------- Additional Comments From cvs-commit at gcc dot gnu dot org 2004-04-11 14:51 ------- Subject: Bug 14872 CVSROOT: /cvs/gcc Module name: gcc Branch: tree-ssa-20020619-branch Changes by: bdavis@gcc.gnu.org 2004-04-11 14:51:41 Modified files: gcc/fortran : ChangeLog trans-io.c gcc/testsuite : ChangeLog.tree-ssa Added files: gcc/testsuite/gfortran.fortran-torture/execute: direct_io.f90 Log message: PR gfortran/14872 * testsuite/gfortran.fortran-torture/execute/direct_io.f90: Add new test. PR fortran/14872 * gcc/gcc/fortran/trans-io.c (build_dt): Change REC to value. Patches: http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/ChangeLog.diff?cvsroot=gcc&only_with_tag=tree-ssa-20020619-branch&r1=1.1.2.137&r2=1.1.2.138 http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/trans-io.c.diff?cvsroot=gcc&only_with_tag=tree-ssa-20020619-branch&r1=1.1.2.9&r2=1.1.2.10 http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/ChangeLog.tree-ssa.diff?cvsroot=gcc&only_with_tag=tree-ssa-20020619-branch&r1=1.1.2.219&r2=1.1.2.220 http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.fortran-torture/execute/direct_io.f90.diff?cvsroot=gcc&only_with_tag=tree-ssa-20020619-branch&r1=NONE&r2=1.1.2.1 -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=14872 ^ permalink raw reply [flat|nested] 5+ messages in thread
* [Bug fortran/14872] [gfortran] Variables used for REC= in READ / WRITE always case run-time error 2004-04-07 5:38 [Bug libfortran/14872] New: [gfortran] Variables used for REC= in READ / WRITE always case run-time error bdavis9659 at comcast dot net ` (2 preceding siblings ...) 2004-04-11 16:07 ` cvs-commit at gcc dot gnu dot org @ 2004-04-11 17:19 ` pinskia at gcc dot gnu dot org 3 siblings, 0 replies; 5+ messages in thread From: pinskia at gcc dot gnu dot org @ 2004-04-11 17:19 UTC (permalink / raw) To: gcc-bugs ------- Additional Comments From pinskia at gcc dot gnu dot org 2004-04-11 16:06 ------- Fixed. -- What |Removed |Added ---------------------------------------------------------------------------- Status|NEW |RESOLVED Resolution| |FIXED http://gcc.gnu.org/bugzilla/show_bug.cgi?id=14872 ^ permalink raw reply [flat|nested] 5+ messages in thread
end of thread, other threads:[~2004-04-11 16:07 UTC | newest] Thread overview: 5+ messages (download: mbox.gz / follow: Atom feed) -- links below jump to the message on this page -- 2004-04-07 5:38 [Bug libfortran/14872] New: [gfortran] Variables used for REC= in READ / WRITE always case run-time error bdavis9659 at comcast dot net 2004-04-07 5:40 ` [Bug fortran/14872] " bdavis9659 at comcast dot net 2004-04-08 18:03 ` pinskia at gcc dot gnu dot org 2004-04-11 16:07 ` cvs-commit at gcc dot gnu dot org 2004-04-11 17:19 ` pinskia at gcc dot gnu dot org
This is a public inbox, see mirroring instructions for how to clone and mirror all data and code used for this inbox; as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).