diff options
| author | Brian Drummond <brian@shapes.demon.co.uk> | 2017-10-04 19:05:36 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2017-10-05 06:15:25 +0200 |
| commit | ffd9fe10d40a133786358828cfab361377b9e8de (patch) | |
| tree | 7e74087448bc579f922a3b6dfc995c0fc807c8d4 /src/grt/grt-errors.ads | |
| parent | 6a465e007f8cd5be01137e2981c5a4864b46cd5b (diff) | |
| download | ghdl-ffd9fe10d40a133786358828cfab361377b9e8de.tar.gz ghdl-ffd9fe10d40a133786358828cfab361377b9e8de.tar.bz2 ghdl-ffd9fe10d40a133786358828cfab361377b9e8de.zip | |
Make error stream available for additional reporting : see issue #26
Diffstat (limited to 'src/grt/grt-errors.ads')
| -rw-r--r-- | src/grt/grt-errors.ads | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/grt/grt-errors.ads b/src/grt/grt-errors.ads index b7ee4c24d..5d316aaea 100644 --- a/src/grt/grt-errors.ads +++ b/src/grt/grt-errors.ads @@ -31,7 +31,8 @@ package Grt.Errors is -- Set the stream for error messages. Must be called before using this -- package. - procedure Set_Out_Stream (Stream : Grt.Stdio.FILEs); + procedure Set_Error_Stream (Stream : Grt.Stdio.FILEs); + function Get_Error_Stream return Grt.Stdio.FILEs; -- Multi-call error procedure. -- Start and continue with Error_C, finish by an Error_E. |