diff options
author | Eric Botcazou <ebotcazou@adacore.com> | 2023-03-02 11:51:22 +0100 |
---|---|---|
committer | Marc Poulhiès <poulhies@adacore.com> | 2023-05-25 09:44:15 +0200 |
commit | 5ca595d97bb99839604ea9a60dce0abc336ed1e5 (patch) | |
tree | 326fdded840273997e02eb0d3a87734986845318 | |
parent | 6b5960e77598c64ea1e5e41e74e4d9a155a95e83 (diff) | |
download | gcc-5ca595d97bb99839604ea9a60dce0abc336ed1e5.zip gcc-5ca595d97bb99839604ea9a60dce0abc336ed1e5.tar.gz gcc-5ca595d97bb99839604ea9a60dce0abc336ed1e5.tar.bz2 |
ada: Minor fixes in description of scope depth
In particular, the scope depth of library units is 1 instead of 0.
gcc/ada/
* einfo.ads (Scope_Depth): Fix circular definition.
(Scope_Depth_Value): Fix value for library units.
-rw-r--r-- | gcc/ada/einfo.ads | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/einfo.ads b/gcc/ada/einfo.ads index 78a1534..b39cffd 100644 --- a/gcc/ada/einfo.ads +++ b/gcc/ada/einfo.ads @@ -4324,14 +4324,14 @@ package Einfo is -- concurrent types, private types and entries, and also to record types, -- i.e. to any entity that can appear on the scope stack. Yields the -- scope depth value, which for those entities other than records is --- simply the scope depth value, for record entities, it is the --- Scope_Depth of the record scope. +-- simply the Scope_Depth_Value, and for record entities, is the +-- Scope_Depth of the record's scope. -- Scope_Depth_Value -- Defined in program units, blocks, loops, return statements, -- concurrent types, private types and entries. -- Indicates the number of scopes that statically enclose the declaration --- of the unit or type. Library units have a depth of zero. Note that +-- of the unit or type. Library units have a depth of one. Note that -- record types can act as scopes but do NOT have this field set (see -- Scope_Depth above). Queries should normally be via Scope_Depth, -- and not call Scope_Depth_Value directly. |