Fix typo.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@86363 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/libgfortran/io/transfer.c b/libgfortran/io/transfer.c
index 5bc3c00..dc12745 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