re PR fortran/35699 (run-time abort writing zero sized section to direct access file)
authorJerry DeLisle <jvdelisle@gcc.gnu.org>
Fri, 28 Mar 2008 22:13:17 +0000 (22:13 +0000)
committerJerry DeLisle <jvdelisle@gcc.gnu.org>
Fri, 28 Mar 2008 22:13:17 +0000 (22:13 +0000)
commitfc8bc1753dbf100f1de181992d80f559061711d6
tree1879a1c6f152773ff9b1ee3b67a6ce9462c387ca
parentad387dad232e58945fc3a1dadc3bd29459d945a0
re PR fortran/35699 (run-time abort writing zero sized section to direct access file)

2008-03-28  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

PR libfortran/35699
* io/transfer.c (write_buf):  Don't pad the record, just return if the
data is NULL.  (next_record_w): If there are bytes left in the record
for unformatted direct I/O, pad out the record with zero bytes.

From-SVN: r133699
libgfortran/ChangeLog
libgfortran/io/transfer.c