[Patch, libgfortran, 4.4] PR 39782 Fix use of uninitialized variable

[Janne Blomqvist <blomqvist dot janne at gmail dot com>]

Hi,

the attached patch is a backport to 4.4 of the patch for PR 39782
already applied to trunk. Tested with regtest and NIST on
x86_64-linux-gnu, Ok for 4.4 branch?

-- 
Janne Blomqvist

Index: transfer.c
===================================================================
--- transfer.c	(revision 147590)
+++ transfer.c	(working copy)
@@ -2948,13 +2948,6 @@ finalize_transfer (st_parameter_dt *dtp)
       if (dtp->u.p.current_unit->flags.form == FORM_FORMATTED
 	  && dtp->u.p.advance_status != ADVANCE_NO)
 	next_record (dtp, 1);
-
-      if (dtp->u.p.current_unit->flags.form == FORM_UNFORMATTED
-	  && file_position (dtp->u.p.current_unit->s) >= dtp->rec)
-	{
-	  flush (dtp->u.p.current_unit->s);
-	  sfree (dtp->u.p.current_unit->s);
-	}
       return;
     }

Attachment: ChangeLog-44
Description: Binary data