------- Comment #9 from jvdelisle at gcc dot gnu dot org  2008-12-08 02:03 
-------
First, thanks for the trace.

Please try this patch.  In the meantime, I need to make sure I have the
backward compatibility with 4.3 runtime OK.  I have one other spot to check in
the code.

Index: transfer.c
===================================================================
--- transfer.c  (revision 142528)
+++ transfer.c  (working copy)
@@ -2141,7 +2141,7 @@ data_transfer_init (st_parameter_dt *dtp
              return;
            }

-         if (dtp->rec >= dtp->u.p.current_unit->maxrec)
+         if (dtp->pos >= dtp->u.p.current_unit->maxrec)
            {
              generate_error (&dtp->common, LIBERROR_BAD_OPTION,
                              "POS=specifier too large");


-- 


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

Reply via email to