Fix typo.

From-SVN: r86363

Fix typo.
From-SVN: r86363
22e4cb8c · Paul Brook · 82507bc9 · 22e4cb8c
Commit 22e4cb8c authored Aug 21, 2004 by Paul Brook
Hide whitespace changes
Inline Side-by-side

Showing with 1 additions and 1 deletions

libgfortran/io/transfer.c
+1 -1

No files found.
--- 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