From f67a6e93a15d3d1e00f35ba8f2fd231cad67048c Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Sun, 9 Feb 2020 14:50:50 -0500 Subject: [PATCH] [Ada] Update comments wrt Ada 83 handling 2020-06-05 Arnaud Charlet gcc/ada/ * cstand.adb (Create_Standard): Update comments. --- gcc/ada/cstand.adb | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/gcc/ada/cstand.adb b/gcc/ada/cstand.adb index dcdfe736d77..ba31bb6cdc9 100644 --- a/gcc/ada/cstand.adb +++ b/gcc/ada/cstand.adb @@ -1573,7 +1573,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. Is this test too early??? + -- it is a renaming of Constraint_Error. This test is too early since + -- it doesn't handle pragma Ada_83. But it's not worth the trouble of + -- fixing this. if Ada_Version = Ada_83 then Build_Exception (S_Numeric_Error); -- 2.30.2