c680ada5f5
2016-10-17 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR fortran/48298 * io/io.h: Move size_used from dtp to unit structure. Add bool has_size to unit structure. * read.c (read_x): Use has_size and size_used. * transfer.c (read_sf_internal,read_sf,read_block_form, read_block_form4): Likewise. (data_transfer_init): If parent, initialize the size variables. (finalize_transfer): Set the size variable using size_used in gfc_unit. (write_block): Delete bogus/dead code. * gfortran.dg/dtio_17.f90: New test. From-SVN: r241294 |
||
|---|---|---|
| .. | ||
| close.c | ||
| fbuf.c | ||
| fbuf.h | ||
| file_pos.c | ||
| format.c | ||
| format.h | ||
| inquire.c | ||
| intrinsics.c | ||
| io.h | ||
| list_read.c | ||
| lock.c | ||
| open.c | ||
| read.c | ||
| size_from_kind.c | ||
| transfer128.c | ||
| transfer.c | ||
| unit.c | ||
| unix.c | ||
| unix.h | ||
| write_float.def | ||
| write.c | ||