2005-09-09 Thomas Koenig <Thomas.Koenig@online.de>
authortkoenig <tkoenig@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 9 Sep 2005 18:21:45 +0000 (18:21 +0000)
committertkoenig <tkoenig@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 9 Sep 2005 18:21:45 +0000 (18:21 +0000)
commit65f9e5fc730d0ed1763b00efb53144ab9d5b0b1d
tree56c7562709009df08fd688c5642a73bd009d5144
parentd14b4c1584e4c22fd175c0932bd93f222403072d
2005-09-09  Thomas Koenig  <Thomas.Koenig@online.de>

* gfortran.h:  Add iomsg to gfc_open, gfc_close, gfc_filepos,
gfc_inquire and gfc_dt.
* dump-parse-tree.c (gfc_show_code_node):  Add iomsg
for open, close, file positioning, inquire and namelist.
* io.c (io_tag):  Add tag_iomsg.
(resolve_tag): Add standards warning for iomsg.
(match_open_element):  Add iomsg.
(gfc_free_open):  Add iomsg.
(gfc_resolve_open):  Add iomsg.
(gfc_free_close):  Add iomsg.
(match_close_element):  Add iomsg.
(gfc_resolve_close):  Add iomsg.
(gfc_free_filepos):  Add iomsg.
(match_file_element):  Add iomsg.
(gfc_resolve_filepos):  Add iostat and iomsg.
(match-dt_element):  Add iomsg.
(gfc_free_dt):  Add iomsg.
(gfc_resolve_dt):  Add iomsg.
(gfc_free_inquire):  Add iomsg.
(match_inquire_element):  Add iomsg.
(gfc_resolve_inquire):  Add iomsg.
* trans_io.c:  Add ioparm_iomsg and ioparm_iomsg_len.
(gfc_build_io_library_fndecls):  Add iomsg as last field.
(gfc_trans_open):  Add iomsg.
(gfc_trans_close):  Add iomsg.
(build_fileos):  Call set_string for iomsg.
(gfc_trans_inquire):  Add iomsg.
(build_dt):  Add iomsg.

2005-09-09  Thomas Koenig  <Thomas.Koenig@online.de>

* io/io.h:  Add iomsg as last field of st_parameter.
* runtime/error.c (generate_error):  If iomsg is present, copy
the message there.

2005-09-09  Thomas Koenig  <Thomas.Koenig@online.de>

* gfortran.dg/iomsg_1.f90:  New test case.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@104102 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/dump-parse-tree.c
gcc/fortran/gfortran.h
gcc/fortran/io.c
gcc/fortran/trans-io.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/iomsg_1.f90 [new file with mode: 0755]
libgfortran/ChangeLog
libgfortran/io/io.h
libgfortran/runtime/error.c