diff options
Diffstat (limited to 'src/grt/grt-errors.ads')
| -rw-r--r-- | src/grt/grt-errors.ads | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/src/grt/grt-errors.ads b/src/grt/grt-errors.ads index 175609cf9..8b53db830 100644 --- a/src/grt/grt-errors.ads +++ b/src/grt/grt-errors.ads @@ -123,11 +123,6 @@ package Grt.Errors is -- If true, an error is expected and the exit status is inverted. Expect_Failure : Boolean := False; - Note_Severity : constant Integer := 0; - Warning_Severity : constant Integer := 1; - Error_Severity : constant Integer := 2; - Failure_Severity : constant Integer := 3; - -- Internal subprograms, to be called only by the symbolizer. procedure Put_Err (C : Character) renames Diag_C; procedure Put_Err (Str : String) renames Diag_C; |