summaryrefslogtreecommitdiff
path: root/gcc/ada/cstand.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/cstand.adb')
-rw-r--r--gcc/ada/cstand.adb4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/cstand.adb b/gcc/ada/cstand.adb
index b7d1c90eb5c..61f2018270c 100644
--- a/gcc/ada/cstand.adb
+++ b/gcc/ada/cstand.adb
@@ -1182,9 +1182,9 @@ package body CStand is
Build_Exception (S_Tasking_Error);
-- Numeric_Error is a normal exception in Ada 83, but in Ada 95
- -- it is a renaming of Constraint_Error
+ -- it is a renaming of Constraint_Error. Is this test too early???
- if Ada_83 then
+ if Ada_Version = Ada_83 then
Build_Exception (S_Numeric_Error);
else