public inbox for gcc-bugs@sourceware.org help / color / mirror / Atom feed
* [Bug fortran/23428] New: inquire(iolength= ) for complex give incorrect value @ 2005-08-16 19:26 weinert at cmth dot phys dot uwm dot edu 2005-08-16 19:53 ` [Bug fortran/23428] " weinert at cmth dot phys dot uwm dot edu ` (5 more replies) 0 siblings, 6 replies; 7+ messages in thread From: weinert at cmth dot phys dot uwm dot edu @ 2005-08-16 19:26 UTC (permalink / raw) To: gcc-bugs implicit none real :: r comples :: c integer :: size_real, size_complex r = 0. ; c = cmplx( 0.,0.) inquire( iolength=size_real ) r ! = 4 inquire( iolength=size_complex) c ! = 4 also; should give 8 end Size of a complex variable should be twice that of the corresponding real kind, but inquire gives the same value. (Similar problem if kind is changed.) Writing to direct access files opened using this record length will die because the record length is too small. -- Summary: inquire(iolength= ) for complex give incorrect value Product: gcc Version: 4.1.0 Status: UNCONFIRMED Severity: normal Priority: P2 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: weinert at cmth dot phys dot uwm dot edu CC: gcc-bugs at gcc dot gnu dot org GCC build triplet: i386-linux GCC host triplet: i386-linux GCC target triplet: i386-linux http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23428 ^ permalink raw reply [flat|nested] 7+ messages in thread
* [Bug fortran/23428] inquire(iolength= ) for complex give incorrect value 2005-08-16 19:26 [Bug fortran/23428] New: inquire(iolength= ) for complex give incorrect value weinert at cmth dot phys dot uwm dot edu @ 2005-08-16 19:53 ` weinert at cmth dot phys dot uwm dot edu 2005-08-16 20:15 ` tkoenig at gcc dot gnu dot org ` (4 subsequent siblings) 5 siblings, 0 replies; 7+ messages in thread From: weinert at cmth dot phys dot uwm dot edu @ 2005-08-16 19:53 UTC (permalink / raw) To: gcc-bugs ------- Additional Comments From weinert at cmth dot phys dot uwm dot edu 2005-08-16 19:34 ------- Created an attachment (id=9507) --> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=9507&action=view) test case -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23428 ^ permalink raw reply [flat|nested] 7+ messages in thread
* [Bug fortran/23428] inquire(iolength= ) for complex give incorrect value 2005-08-16 19:26 [Bug fortran/23428] New: inquire(iolength= ) for complex give incorrect value weinert at cmth dot phys dot uwm dot edu 2005-08-16 19:53 ` [Bug fortran/23428] " weinert at cmth dot phys dot uwm dot edu @ 2005-08-16 20:15 ` tkoenig at gcc dot gnu dot org 2005-08-16 20:34 ` [Bug libfortran/23428] " cvs-commit at gcc dot gnu dot org ` (3 subsequent siblings) 5 siblings, 0 replies; 7+ messages in thread From: tkoenig at gcc dot gnu dot org @ 2005-08-16 20:15 UTC (permalink / raw) To: gcc-bugs ------- Additional Comments From tkoenig at gcc dot gnu dot org 2005-08-16 20:12 ------- Confirmed. -- What |Removed |Added ---------------------------------------------------------------------------- AssignedTo|unassigned at gcc dot gnu |tkoenig at gcc dot gnu dot |dot org |org Status|UNCONFIRMED |ASSIGNED Ever Confirmed| |1 Last reconfirmed|0000-00-00 00:00:00 |2005-08-16 20:12:32 date| | http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23428 ^ permalink raw reply [flat|nested] 7+ messages in thread
* [Bug libfortran/23428] inquire(iolength= ) for complex give incorrect value 2005-08-16 19:26 [Bug fortran/23428] New: inquire(iolength= ) for complex give incorrect value weinert at cmth dot phys dot uwm dot edu 2005-08-16 19:53 ` [Bug fortran/23428] " weinert at cmth dot phys dot uwm dot edu 2005-08-16 20:15 ` tkoenig at gcc dot gnu dot org @ 2005-08-16 20:34 ` cvs-commit at gcc dot gnu dot org 2005-08-16 21:32 ` cvs-commit at gcc dot gnu dot org ` (2 subsequent siblings) 5 siblings, 0 replies; 7+ messages in thread From: cvs-commit at gcc dot gnu dot org @ 2005-08-16 20:34 UTC (permalink / raw) To: gcc-bugs ------- Additional Comments From cvs-commit at gcc dot gnu dot org 2005-08-16 20:26 ------- Subject: Bug 23428 CVSROOT: /cvs/gcc Module name: gcc Changes by: tkoenig@gcc.gnu.org 2005-08-16 20:26:04 Modified files: libgfortran : ChangeLog libgfortran/io : transfer.c gcc/testsuite : ChangeLog Added files: gcc/testsuite/gfortran.dg: inquire-complex.f90 Log message: 2005-08-16 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/23428 * io/transfer.c (iolength_transfer): Remove __attribute__ ((unused)) from type. Return correct length for inquire(iolength=) for complex variables. 2005-08-16 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/23428 * gfortran.dg/inquire-complex.f90: New test case. Patches: http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/libgfortran/ChangeLog.diff?cvsroot=gcc&r1=1.284&r2=1.285 http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/libgfortran/io/transfer.c.diff?cvsroot=gcc&r1=1.52&r2=1.53 http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/ChangeLog.diff?cvsroot=gcc&r1=1.5929&r2=1.5930 http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/inquire-complex.f90.diff?cvsroot=gcc&r1=NONE&r2=1.1 -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23428 ^ permalink raw reply [flat|nested] 7+ messages in thread
* [Bug libfortran/23428] inquire(iolength= ) for complex give incorrect value 2005-08-16 19:26 [Bug fortran/23428] New: inquire(iolength= ) for complex give incorrect value weinert at cmth dot phys dot uwm dot edu ` (2 preceding siblings ...) 2005-08-16 20:34 ` [Bug libfortran/23428] " cvs-commit at gcc dot gnu dot org @ 2005-08-16 21:32 ` cvs-commit at gcc dot gnu dot org 2005-08-16 21:40 ` cvs-commit at gcc dot gnu dot org 2005-08-16 22:08 ` tkoenig at gcc dot gnu dot org 5 siblings, 0 replies; 7+ messages in thread From: cvs-commit at gcc dot gnu dot org @ 2005-08-16 21:32 UTC (permalink / raw) To: gcc-bugs ------- Additional Comments From cvs-commit at gcc dot gnu dot org 2005-08-16 21:30 ------- Subject: Bug 23428 CVSROOT: /cvs/gcc Module name: gcc Changes by: tkoenig@gcc.gnu.org 2005-08-16 21:30:32 Modified files: gcc/testsuite/gfortran.dg: inquire-complex.f90 Log message: 2005-08-16 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/23428 * gfortran.dg/inquire-complex.f90: Correct mangled testcase. Patches: http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/inquire-complex.f90.diff?cvsroot=gcc&r1=1.1&r2=1.2 -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23428 ^ permalink raw reply [flat|nested] 7+ messages in thread
* [Bug libfortran/23428] inquire(iolength= ) for complex give incorrect value 2005-08-16 19:26 [Bug fortran/23428] New: inquire(iolength= ) for complex give incorrect value weinert at cmth dot phys dot uwm dot edu ` (3 preceding siblings ...) 2005-08-16 21:32 ` cvs-commit at gcc dot gnu dot org @ 2005-08-16 21:40 ` cvs-commit at gcc dot gnu dot org 2005-08-16 22:08 ` tkoenig at gcc dot gnu dot org 5 siblings, 0 replies; 7+ messages in thread From: cvs-commit at gcc dot gnu dot org @ 2005-08-16 21:40 UTC (permalink / raw) To: gcc-bugs ------- Additional Comments From cvs-commit at gcc dot gnu dot org 2005-08-16 21:38 ------- Subject: Bug 23428 CVSROOT: /cvs/gcc Module name: gcc Branch: gcc-4_0-branch Changes by: tkoenig@gcc.gnu.org 2005-08-16 21:38:29 Modified files: libgfortran : ChangeLog libgfortran/io : transfer.c gcc/testsuite : ChangeLog Added files: gcc/testsuite/gfortran.dg: inquire-complex.f90 Log message: 2005-08-16 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/23428 * io/transfer.c (iolength_transfer): Return correct length for inquire(iolength=) for complex variables. 2005-08-16 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/23428 * gfortran.dg/inquire-complex.f90: New test case. Patches: http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/libgfortran/ChangeLog.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.163.2.78&r2=1.163.2.79 http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/libgfortran/io/transfer.c.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.32.2.12&r2=1.32.2.13 http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/ChangeLog.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=1.5084.2.337&r2=1.5084.2.338 http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/inquire-complex.f90.diff?cvsroot=gcc&only_with_tag=gcc-4_0-branch&r1=NONE&r2=1.2.2.1 -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23428 ^ permalink raw reply [flat|nested] 7+ messages in thread
* [Bug libfortran/23428] inquire(iolength= ) for complex give incorrect value 2005-08-16 19:26 [Bug fortran/23428] New: inquire(iolength= ) for complex give incorrect value weinert at cmth dot phys dot uwm dot edu ` (4 preceding siblings ...) 2005-08-16 21:40 ` cvs-commit at gcc dot gnu dot org @ 2005-08-16 22:08 ` tkoenig at gcc dot gnu dot org 5 siblings, 0 replies; 7+ messages in thread From: tkoenig at gcc dot gnu dot org @ 2005-08-16 22:08 UTC (permalink / raw) To: gcc-bugs ------- Additional Comments From tkoenig at gcc dot gnu dot org 2005-08-16 21:39 ------- Fixed in 4.0 and mainline. Closing. -- What |Removed |Added ---------------------------------------------------------------------------- Status|ASSIGNED |RESOLVED Keywords| |wrong-code Resolution| |FIXED Target Milestone|--- |4.0.2 http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23428 ^ permalink raw reply [flat|nested] 7+ messages in thread
end of thread, other threads:[~2005-08-16 21:40 UTC | newest] Thread overview: 7+ messages (download: mbox.gz / follow: Atom feed) -- links below jump to the message on this page -- 2005-08-16 19:26 [Bug fortran/23428] New: inquire(iolength= ) for complex give incorrect value weinert at cmth dot phys dot uwm dot edu 2005-08-16 19:53 ` [Bug fortran/23428] " weinert at cmth dot phys dot uwm dot edu 2005-08-16 20:15 ` tkoenig at gcc dot gnu dot org 2005-08-16 20:34 ` [Bug libfortran/23428] " cvs-commit at gcc dot gnu dot org 2005-08-16 21:32 ` cvs-commit at gcc dot gnu dot org 2005-08-16 21:40 ` cvs-commit at gcc dot gnu dot org 2005-08-16 22:08 ` tkoenig 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).