f77 bug?

[John H Merritt]

Here is a fortran source with compiled and linked ok!  The compilier
should have caught the error.

      program test

      write(6,100)
 100  formatf('This is only a test')

      stop
      end

When running it the messages are:

iris613 50> f77 test.f
iris613 51> a.out
startio: error in format
apparent state: unit 6 named
last format: f(This is only a test)
lately writing sequential formatted external IO

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
John H. Merritt                   #  Yesterday I knew nothing,
Applied Research Corporation      #  Today I know that.
merritt at iris613.gsfc.nasa.gov     #