Fix typo.

From-SVN: r86363
2004-08-21 13:23:13 +00:00 · 2004-08-21 13:23:13 +00:00 · 22e4cb8c23
parent 82507bc996
commit 22e4cb8c23
1 changed files with 1 additions and 1 deletions
--- 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