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

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).