public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
From: "aovb94 at dsl dot pipex dot com" <gcc-bugzilla@gcc.gnu.org>
To: gcc-bugs@gcc.gnu.org
Subject: [Bug fortran/16805] New: Runtime failure using list directed read from string
Date: Wed, 28 Jul 2004 17:59:00 -0000	[thread overview]
Message-ID: <20040728175903.16805.aovb94@dsl.pipex.com> (raw)

Test code:

      PROGRAM rdch
!
      IMPLICIT NONE
!
      REAL                 :: fp
      CHARACTER (LEN = 10) :: ch
!
      ch = '    1     '
!
      WRITE (6,*) 'ch = ', ch
      READ (ch(5:5),*) fp
      WRITE (6,*) 'fp = ', fp
!
      STOP
      END

Produces runtime error:

At line 11 of file rdch.f95
Fortran runtime error: Inappropriate ioctl for device
 ch =     1     

Compilation output:

Driving: gfortran -v -Wall -save-temps -o rdch rdch.f95 -lgfortranbegin
-lgfortran -lm -shared-libgcc
Reading specs from /home/martin/GCC/usr/local/lib/gcc/i686-pc-linux-gnu/3.5.0/specs
Configured with: ../gcc/configure --prefix=/home/martin/GCC/usr/local :
(reconfigured) ../gcc/configure --prefix=/home/martin/GCC/usr/local
--enable-languages=f95 : (reconfigured) ../gcc/configure
--prefix=/home/martin/GCC/usr/local
--with-gcc-version-trigger=/home/martin/GCC/gcc/gcc/version.c
--enable-languages=c,f95 --no-create --no-recursion : (reconfigured)
../gcc/configure --prefix=/home/martin/GCC/usr/local --enable-languages=f95 :
(reconfigured) ../gcc/configure --prefix=/home/martin/GCC/usr/local
--with-gcc-version-trigger=/home/martin/GCC/gcc/gcc/version.c
--enable-languages=c,f95 --no-create --no-recursion : (reconfigured)
../gcc/configure --prefix=/home/martin/GCC/usr/local
--with-gcc-version-trigger=/home/martin/GCC/gcc/gcc/version.c
--enable-languages=c,f95 --no-create --no-recursion : (reconfigured)
../gcc/configure --prefix=/home/martin/GCC/usr/local --enable-languages=f95
Thread model: posix
gcc version 3.5.0 20040726 (experimental)
 /home/martin/GCC/usr/local/libexec/gcc/i686-pc-linux-gnu/3.5.0/f951 rdch.f95
-quiet -dumpbase rdch.f95 -mtune=pentiumpro -auxbase rdch -Wall -version -o rdch.s
GNU F95 version 3.5.0 20040726 (experimental) (i686-pc-linux-gnu)
	compiled by GNU C version 3.5.0 20040726 (experimental).
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
 as -V -Qy -o rdch.o rdch.s
GNU assembler version 2.15.90.0.3 (i386-redhat-linux) using BFD version
2.15.90.0.3 20040415
 /home/martin/GCC/usr/local/libexec/gcc/i686-pc-linux-gnu/3.5.0/collect2
--eh-frame-hdr -m elf_i386 -dynamic-linker /lib/ld-linux.so.2 -o rdch
/usr/lib/crt1.o /usr/lib/crti.o
/home/martin/GCC/usr/local/lib/gcc/i686-pc-linux-gnu/3.5.0/crtbegin.o
-L/home/martin/GCC/usr/local/lib/gcc/i686-pc-linux-gnu/3.5.0
-L/home/martin/GCC/usr/local/lib/gcc/i686-pc-linux-gnu/3.5.0/../../.. rdch.o
-lgfortranbegin -lgfortran -lm -lgcc_s -lgcc -lc -lgcc_s -lgcc
/home/martin/GCC/usr/local/lib/gcc/i686-pc-linux-gnu/3.5.0/crtend.o /usr/lib/crtn.o

Similar code performs as expected for g77. Code known to work with SUN Workshop 6.

-- 
           Summary: Runtime failure using list directed read from string
           Product: gcc
           Version: 3.5.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: aovb94 at dsl dot pipex dot com
                CC: gcc-bugs at gcc dot gnu dot org


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=16805


             reply	other threads:[~2004-07-28 17:59 UTC|newest]

Thread overview: 8+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2004-07-28 17:59 aovb94 at dsl dot pipex dot com [this message]
2004-07-29  0:22 ` [Bug libfortran/16805] " pinskia at gcc dot gnu dot org
2004-08-02  1:07 ` pinskia at gcc dot gnu dot org
2004-08-13  2:17 ` bdavis at gcc dot gnu dot org
2004-08-29 16:10 ` bdavis at gcc dot gnu dot org
2004-08-31 20:38 ` cvs-commit at gcc dot gnu dot org
2004-08-31 20:55 ` pbrook at gcc dot gnu dot org
2004-08-31 20:56 ` pinskia at gcc dot gnu dot org

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=20040728175903.16805.aovb94@dsl.pipex.com \
    --to=gcc-bugzilla@gcc.gnu.org \
    --cc=gcc-bugs@gcc.gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
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).