Commit b9297522 by Francois-Xavier Coudert Committed by François-Xavier Coudert

* io/transfer.c (formatted_transfer): Fix typo in error message.

From-SVN: r101102
parent 2f06ccc6
2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
* io/transfer.c (formatted_transfer): Fix typo in error message.
2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
PR libfortran/16436
* io/transfer.c (read_sf): Correct updating of bytes_left field.
(formatted_transfer): Correct updating of bytes_left field and
......
......@@ -685,7 +685,7 @@ formatted_transfer (bt type, void *p, int len)
if (pos < 0 || pos >= current_unit->recl )
{
generate_error (ERROR_EOR, "T Or TL edit position error");
generate_error (ERROR_EOR, "T or TL edit position error");
break ;
}
m = pos - (current_unit->recl - current_unit->bytes_left);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment