diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 1f6b514430b..e496264c6bc 100644
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,9 @@
+2010-03-10  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
+
+	PR libfortran/43320
+	* io/transfer.c (next_record_r): Add hit_eof based on item_count
+	condition.
+
 2010-03-09  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 
 	PR libfortran/43265
diff --git a/libgfortran/io/transfer.c b/libgfortran/io/transfer.c
index c5d26a5973f..958ef656b73 100644
--- a/libgfortran/io/transfer.c
+++ b/libgfortran/io/transfer.c
@@ -2810,6 +2810,8 @@ next_record_r (st_parameter_dt *dtp)
 		{
                   if (errno != 0)
                     generate_error (&dtp->common, LIBERROR_OS, NULL);
+		  else if (dtp->u.p.item_count == 1)
+		    hit_eof (dtp);
 		  break;
                 }