f77 bug on IRIX 3.2
John H Merritt
merritt at iris613.gsfc.nasa.gov
Sat Jun 30 09:31:40 AEST 1990
Here's something that fails to produce correct output.
When you use a temporary variable for c_ext (or the string),
in the concatination statement, you get the correct result.
program ch
character c_ext*16, filename*7
filename = 'FOO.BAR'
c_ext = '.2'
c_ext = filename // c_ext
print*,'c_ext:',c_ext
stop
end
Produces:
c_ext:FOO.BARFOO.BAR
I remember a bug when using // to create a filename in an open statement.
Is this the same bug?
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
John H. Merritt # Yesterday I knew nothing,
Applied Research Corporation # Today I know that.
merritt at iris613.gsfc.nasa.gov #
More information about the Comp.sys.sgi
mailing list