OSDN Git Service

2010-03-17 Jerry DeLisle <jvdelisle@gcc.gnu.org>
[pf3gnuchains/gcc-fork.git] / libgfortran / ChangeLog
index 8162fa0..af5fefe 100644 (file)
@@ -1,3 +1,20 @@
+2010-03-17  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
+
+       PR libfortran/43265
+       * io/io.h: Delete prototype for read_sf, making it static.
+       * io/read.c (read_x): Modify to call hit_eof if PAD="no".
+       * io/transfer.c (read_sf_internal): New static function extracted from
+       read_sf for use on internal units only. Handle empty string case.
+       (read_sf): New factoring of this function, make it static.  Add special
+       conditions for EOF based on ADVANCE="no", PAD="no", and whether any
+       bytes have been previously read from the record.
+       (read_block_form): Modify to call read_sf or read_sf_internal.
+       (next_record_r): Add a done flag similar to next_record_w. Call hit_eof
+       if internal array unit next record returns finished, meaning an EOF was
+       found and not done, ie not the last record expected.  For external
+       units call hit_eof if item_count is 1 or there are no pending spaces.
+       (next_record): Update call to next_record_r.
+
 2010-03-12  Kai Tietz  <kai.tietz@onevision.com>
 
        PR/42950