[Bug libfortran/35132] Formatted stream I/O write should truncate

[jvdelisle at gcc dot gnu dot org]

------- Comment #6 from jvdelisle at gcc dot gnu dot org  2008-02-10 13:51 -------
The patch only touches on formatted stream io:

    case FORMATTED_STREAM:
    case FORMATTED_SEQUENTIAL:
---snip---
          if (is_stream_io (dtp))
            {
              dtp->u.p.current_unit->strm_pos += len;
              struncate(dtp->u.p.current_unit->s);
            }


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35132