From: Arnaud Charlet <charlet@adacore.com>
Date: Sun, 9 Feb 2020 19:50:50 +0000 (-0500)
Subject: [Ada] Update comments wrt Ada 83 handling
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=f67a6e93a15d3d1e00f35ba8f2fd231cad67048c;p=gcc.git

[Ada] Update comments wrt Ada 83 handling

2020-06-05  Arnaud Charlet  <charlet@adacore.com>

gcc/ada/

	* cstand.adb (Create_Standard): Update comments.
---

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);