[Bug fortran/42527] New: Fortran FORMAT descriptor "X" generates nulls instead of blanks for ACCESS='stream" files
urbanjost at comcast dot net
gcc-bugzilla@gcc.gnu.org
Mon Dec 28 22:41:00 GMT 2009
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
More information about the Gcc-bugs
mailing list