I can't get the newest gfortran version to run on my platform (CygWin/Vista);
but have
a very small reproducer and could not find this one listed in Bugzilla.

#!/bin/sh
cat >missouri.f <<\EOF
!ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
! 1x in format is generating a null instead of a space when stream I/O is used.
      program testit
      parameter (isize=23)
      real ra(isize) 
      do i10=1,isize
        ra(i10)=i10
      enddo
      open(unit=11,file="mystream11",access="stream",form="formatted")
      open(unit=10,file="mystream10",form="formatted")
      write(10,'(9999(f8.2,1x))')ra
      write(11,'(9999(f8.2,1x))')ra
      end
!ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
EOF
(
   exec 2>&1
   export PATH
   #PATH=/usr/local/gfortran/bin:$PATH
   rm -f missouri mystream10 mystream11
   gfortran missouri.f -Wall -save-temps -o missouri
   ./missouri 
   cat -v -t -n mystream10
   cat -v -t -n mystream11
   echo ==============================================
   cat missouri.i
   echo ==============================================
   rm -f missouri mystream10 mystream11
   uname -a
   echo ==============================================
   gfortran -v missouri.f -o missouri
   echo ==============================================
) >>$0
exit
     1      1.00     2.00     3.00     4.00     5.00     6.00     7.00     8.00
    9.00    10.00    11.00    12.00    13.00    14.00    15.00    16.00   
17.00    18.00    19.00    20.00    21.00    22.00    23.00
     1      1.00^@    2.00^@    3.00^@    4.00^@    5.00^@    6.00^@    7.00^@ 
  8.00^@    9.00^@   10.00^@   11.00^@   12.00^@   13.00^@   14.00^@   15.00^@ 
 16.00^@   17.00^@   18.00^@   19.00^@   20.00^@   21.00^@   22.00^@   23.00
==============================================
cat: missouri.i: No such file or directory
==============================================
CYGWIN_NT-6.0 urbanjs-PC 1.5.25(0.156/4/2) 2008-06-12 19:34 i686 Cygwin
==============================================
Driving: gfortran -v missouri.f -o missouri -lgfortranbegin -lgfortran
-shared-libgcc
Using built-in specs.
Target: i686-pc-cygwin
Configured with: /gnu/gcc/package/gcc4-4.3.2-2/src/gcc-4.3.2/configure
--srcdir=/gnu/gcc/package/gcc4-4.3.2-2/src/gcc-4.3.2 --prefix=/usr
--exec-prefix=/usr --bindir=/usr/bin --sbindir=/usr/sbin --libexecdir=/usr/sbin
--datadir=/usr/share --localstatedir=/var --sysconfdir=/etc
--infodir=/usr/share/info --mandir=/usr/share/man --datadir=/usr/share
--infodir=/usr/share/info --mandir=/usr/share/man -v --with-gmp=/usr
--with-mpfr=/usr --enable-bootstrap --enable-version-specific-runtime-libs
--with-slibdir=/usr/bin --libexecdir=/usr/lib --enable-static --enable-shared
--enable-shared-libgcc --enable-__cxa_atexit --with-gnu-ld --with-gnu-as
--with-dwarf2 --disable-sjlj-exceptions
--enable-languages=ada,c,c++,fortran,java,objc,obj-c++ --disable-symvers
--enable-libjava --program-suffix=-4 --enable-libgomp --enable-libssp
--enable-libada --enable-threads=posix AS=/opt/gcc-tools/bin/as.exe
AS_FOR_TARGET=/opt/gcc-tools/bin/as.exe LD=/opt/gcc-tools/bin/ld.exe
LD_FOR_TARGET=/opt/gcc-tools/bin/ld.exe
Thread model: posix
gcc version 4.3.2 20080827 (beta) 2 (GCC) 
COLLECT_GCC_OPTIONS='-v' '-o' 'missouri.exe' '-shared-libgcc' '-mtune=generic'
 /usr/lib/gcc/i686-pc-cygwin/4.3.2/f951.exe missouri.f -ffixed-form -quiet
-dumpbase missouri.f -mtune=generic -auxbase missouri -version
-fintrinsic-modules-path /usr/lib/gcc/i686-pc-cygwin/4.3.2/finclude -o
/cygdrive/c/Users/urbanjs/AppData/Local/Temp/cc7acXJS.s
GNU F95 (GCC) version 4.3.2 20080827 (beta) 2 (i686-pc-cygwin)
        compiled by GNU C version 4.3.2 20080827 (beta) 2, GMP version 4.2.4,
MPFR version 2.4.1.
GGC heuristics: --param ggc-min-expand=100 --param ggc-min-heapsize=131072
COLLECT_GCC_OPTIONS='-v' '-o' 'missouri.exe' '-shared-libgcc' '-mtune=generic'
 /usr/lib/gcc/i686-pc-cygwin/4.3.2/../../../../i686-pc-cygwin/bin/as.exe -v -o
/cygdrive/c/Users/urbanjs/AppData/Local/Temp/cc2eaP3U.o
/cygdrive/c/Users/urbanjs/AppData/Local/Temp/cc7acXJS.s
GNU assembler version 2.18.50 (i686-pc-cygwin) using BFD version (GNU Binutils)
2.18.50.20080625
COMPILER_PATH=/usr/lib/gcc/i686-pc-cygwin/4.3.2/:/usr/lib/gcc/i686-pc-cygwin/4.3.2/:/usr/lib/gcc/i686-pc-cygwin/:/usr/lib/gcc/i686-pc-cygwin/4.3.2/:/usr/lib/gcc/i686-pc-cygwin/:/usr/lib/gcc/i686-pc-cygwin/4.3.2/:/usr/lib/gcc/i686-pc-cygwin/:/usr/lib/gcc/i686-pc-cygwin/4.3.2/../../../../i686-pc-cygwin/bin/
LIBRARY_PATH=/usr/lib/gcc/i686-pc-cygwin/4.3.2/:/usr/lib/gcc/i686-pc-cygwin/4.3.2/:/usr/lib/gcc/i686-pc-cygwin/4.3.2/../../../:/lib/:/usr/lib/
COLLECT_GCC_OPTIONS='-v' '-o' 'missouri.exe' '-shared-libgcc' '-mtune=generic'
 /usr/lib/gcc/i686-pc-cygwin/4.3.2/collect2.exe -Bdynamic
--dll-search-prefix=cyg -u ___register_frame_info -u ___deregister_frame_info
-o missouri.exe /usr/lib/gcc/i686-pc-cygwin/4.3.2/../../../crt0.o
/usr/lib/gcc/i686-pc-cygwin/4.3.2/crtbegin.o
-L/usr/lib/gcc/i686-pc-cygwin/4.3.2 -L/usr/lib/gcc/i686-pc-cygwin/4.3.2
-L/usr/lib/gcc/i686-pc-cygwin/4.3.2/../../..
/cygdrive/c/Users/urbanjs/AppData/Local/Temp/cc2eaP3U.o -lgfortranbegin
-lgfortran -lgcc_s -lgcc_s -lgcc -lcygwin -luser32 -lkernel32 -ladvapi32
-lshell32 -lgcc_s -lgcc_s -lgcc /usr/lib/gcc/i686-pc-cygwin/4.3.2/crtend.o
==============================================


-- 
           Summary: Fortran FORMAT descriptor "X" generates nulls instead of
                    blanks for ACCESS='stream" files
           Product: gcc
           Version: unknown
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: urbanjost at comcast dot net


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

Reply via email to