diff options
| author | dje <dje@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-01-23 00:14:31 +0000 |
|---|---|---|
| committer | dje <dje@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-01-23 00:14:31 +0000 |
| commit | ff81ee3b6e43e270bebd2400f3521f2d6da8cc59 (patch) | |
| tree | 58334819ab2857c14b05d08b9782ac195c0413b5 /libgfortran/runtime | |
| parent | 8e2779612f337c1cda856597cbed11d136a1209e (diff) | |
| download | gcc-ff81ee3b6e43e270bebd2400f3521f2d6da8cc59.tar.gz | |
PR libgfortran/19052
* libgfortran.h (options_t): Add stderr_unit.
* io/io.h (error_stream): Declare.
* io/open.c (new_unit): Do not terminate abnormally if opening
file preconnected to stdin, stdout, or stderr.
* io/unit.c (init_units): Initialize stderr_unit.
* io/unix.c (error_stream): New function.
* runtime/environ.c (GFORTRAN_STDERR_UNIT): New environment variable.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@94090 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/runtime')
| -rw-r--r-- | libgfortran/runtime/environ.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/libgfortran/runtime/environ.c b/libgfortran/runtime/environ.c index 87fe565729d..ae82f562b75 100644 --- a/libgfortran/runtime/environ.c +++ b/libgfortran/runtime/environ.c @@ -443,6 +443,11 @@ static variable variable_table[] = { "Unit number that will be preconnected to standard output\n" "(No preconnection if negative)"}, + {"GFORTRAN_STDERR_UNIT", 0, &options.stderr_unit, init_integer, + show_integer, + "Unit number that will be preconnected to standard error\n" + "(No preconnection if negative)"}, + {"GFORTRAN_USE_STDERR", 1, &options.use_stderr, init_boolean, show_boolean, "Sends library output to standard error instead of standard output."}, |