diff options
| author | Arnaud Charlet <charlet@adacore.com> | 2020-02-09 14:50:50 -0500 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2020-06-05 08:17:56 -0400 |
| commit | f67a6e93a15d3d1e00f35ba8f2fd231cad67048c (patch) | |
| tree | afa1fa2843534919da4eebb1a7611ba25147014b /gcc | |
| parent | 4ccf713e545cc77ba13218c12ec47d21b01bab4e (diff) | |
| download | gcc-f67a6e93a15d3d1e00f35ba8f2fd231cad67048c.zip gcc-f67a6e93a15d3d1e00f35ba8f2fd231cad67048c.tar.gz gcc-f67a6e93a15d3d1e00f35ba8f2fd231cad67048c.tar.bz2 | |
[Ada] Update comments wrt Ada 83 handling
2020-06-05 Arnaud Charlet <charlet@adacore.com>
gcc/ada/
* cstand.adb (Create_Standard): Update comments.
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/cstand.adb | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/gcc/ada/cstand.adb b/gcc/ada/cstand.adb index dcdfe73..ba31bb6 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); |