diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2005-12-28 20:58:08 +0000 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2005-12-28 20:58:08 +0000 |
| commit | 844234fb50d86f0e03b6645bf40011d45a8ae65c (patch) | |
| tree | b63a6a30c0af2c94fb6a30da53a4f61a383ada74 /libgfortran/libgfortran.h | |
| parent | ff7417d4c9b74b85cfb17000718b245b2aa96cb5 (diff) | |
| download | gcc-844234fb50d86f0e03b6645bf40011d45a8ae65c.zip gcc-844234fb50d86f0e03b6645bf40011d45a8ae65c.tar.gz gcc-844234fb50d86f0e03b6645bf40011d45a8ae65c.tar.bz2 | |
re PR libfortran/25139 ("Invalid argument" error on I/O)
2005-12-28 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/25139
* io/unix.c (fd_truncate): Set s->active to zero.
PR libgfortran/25510
* libgfortran.h: Add ERROR_INTERNAL and ERROR_INTERNAL_UNIT.
* runtime/error.c (translate_error): Add messages for new errors.
* io/list_read.c (next_char): Use new errors.
* io/transfer.c (next_record_r) (next_record_w): Use new errors.
From-SVN: r109122
Diffstat (limited to 'libgfortran/libgfortran.h')
| -rw-r--r-- | libgfortran/libgfortran.h | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/libgfortran/libgfortran.h b/libgfortran/libgfortran.h index aacc7b8..b64b60b 100644 --- a/libgfortran/libgfortran.h +++ b/libgfortran/libgfortran.h @@ -407,6 +407,8 @@ typedef enum ERROR_BAD_US, ERROR_READ_VALUE, ERROR_READ_OVERFLOW, + ERROR_INTERNAL, + ERROR_INTERNAL_UNIT, ERROR_LAST /* Not a real error, the last error # + 1. */ } error_codes; |