re PR fortran/40008 (F2008: Add NEWUNIT= for OPEN statement)
2009-05-31 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR fortran/40008 * gfortran.h (gfc_open): Add newunit expression to structure. * io.c (io_tag): Add new unit tag and fix whitespace. (match_open_element): Add matching for newunit. (gfc_free_open): Free the newunit expression. (gfc_resolve_open): Add newunit to resolution and check constraints. (gfc_resolve_close): Add check for non-negative unit. (gfc_resolve_filepos): Likewise. (gfc_resolve_dt): Likewise. * trans-io.c (set_parameter_value): Build runtime checks for unit numbers within range of kind=4 integer. (gfc_trans_open) Set the newunit parameter. * ioparm.def (IOPARM): Define the newunit parameter as a pointer to GFC_INTEGER_4, pint4. From-SVN: r148252
Showing
- gcc/fortran/ChangeLog 17 additions, 0 deletionsgcc/fortran/ChangeLog
- gcc/fortran/gfortran.h 1 addition, 1 deletiongcc/fortran/gfortran.h
- gcc/fortran/io.c 51 additions, 3 deletionsgcc/fortran/io.c
- gcc/fortran/ioparm.def 1 addition, 0 deletionsgcc/fortran/ioparm.def
- gcc/fortran/trans-io.c 13 additions, 8 deletionsgcc/fortran/trans-io.c
Loading
Please register or sign in to comment