Fix typo.

From-SVN: r86363

diff --git a/libgfortran/io/transfer.c b/libgfortran/io/transfer.c
index 5bc3c002b6086b775a800139b701986d8558e9ad..dc12745bb133d43863712254c25e9fb43b699a89 100644 (file)
--- a/libgfortran/io/transfer.c
+++ b/libgfortran/io/transfer.c
@@ -1321,7 +1321,7 @@ next_record (int done)
    {
     fp = file_position (current_unit->s);
     /* Calculate next record, rounding up partial records.  */
-    current_unit->last_record = (fp + curren_unit->recl - 1)
+    current_unit->last_record = (fp + current_unit->recl - 1)
                                / current_unit->recl;
    }
   else