diff options
author | Tristan Gingold <tgingold@free.fr> | 2021-01-26 07:49:57 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2021-01-26 07:49:57 +0100 |
commit | 0978b48007afe920d8f7000c2c8722327c901259 (patch) | |
tree | 2bccc8796a0bb037a363e2fa698c038af50e56d1 /src/grt/grt-errors.ads | |
parent | 6b81ec185f16791362ca770f391578c2a8b828f0 (diff) | |
download | ghdl-0978b48007afe920d8f7000c2c8722327c901259.tar.gz ghdl-0978b48007afe920d8f7000c2c8722327c901259.tar.bz2 ghdl-0978b48007afe920d8f7000c2c8722327c901259.zip |
grt: add Error_NF to report final error status. Fix #803
Diffstat (limited to 'src/grt/grt-errors.ads')
-rw-r--r-- | src/grt/grt-errors.ads | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/grt/grt-errors.ads b/src/grt/grt-errors.ads index f70a77764..371908fad 100644 --- a/src/grt/grt-errors.ads +++ b/src/grt/grt-errors.ads @@ -80,6 +80,10 @@ package Grt.Errors is Line : Ghdl_I32); pragma No_Return (Error); + -- Non-fatal error (for the final message in case of previous error). + -- Set the exit status. + procedure Error_NF (Str : String); + -- Warning message. procedure Warning (Str : String); |