[Bug fortran/67367] Program crashes on READ(IOSTAT=IOS, ...) on directory OPEN()ed without error

[jvdelisle at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67367

--- Comment #6 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
Created attachment 36266
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=36266&action=edit
Better than preliminary

This patch returns the correct code from raw_read and we get the "Is a
directory"
error message as we should.  I think this is it.  I will regression test and
work up a test case.