------- Additional Comments From Thomas dot Koenig at online dot de  2005-01-31 
17:02 -------
This looks promising.

I'll do a full check later.

        Thomas

--- transfer.c.orig     2005-01-31 18:03:12.000000000 +0100
+++ transfer.c  2005-01-31 18:04:00.000000000 +0100
@@ -150,6 +150,14 @@
   else
     p = base = data;

+  /* If we have seen the end of the record already, we just
+   * return blanks.
+   */
+  if (sf_seen_eor) {
+    memset(base,' ',*length);
+    return base;
+  }
+
   memset(base,'\0',*length);

   current_unit->bytes_left = options.default_recl;
@@ -1222,8 +1230,11 @@
     case FORMATTED_SEQUENTIAL:
       length = 1;
       /* sf_read has already terminated input because of an '\n'  */
-      if (sf_seen_eor)
-         break;
+      if (sf_seen_eor)
+       {
+         sf_seen_eor = 0;
+         break;
+       }

       do
         {


-- 


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

Reply via email to