From 67a3b519af65068c5ad8173373068929b99a3912 Mon Sep 17 00:00:00 2001 From: Eric Botcazou Date: Fri, 21 Aug 2020 15:49:13 +0200 Subject: [PATCH] [Ada] Adjust documentation for Has_Constrained_Partial_View flag gcc/ada/ * einfo.ads (Has_Constrained_Partial_View): Add "base type" marker. --- gcc/ada/einfo.ads | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gcc/ada/einfo.ads b/gcc/ada/einfo.ads index 107bd10f1d0..a3aeb36e099 100644 --- a/gcc/ada/einfo.ads +++ b/gcc/ada/einfo.ads @@ -1576,7 +1576,7 @@ package Einfo is -- Defined for the given type. Note that this flag can be False even -- if Component_Size is non-zero (happens in the case of derived types). --- Has_Constrained_Partial_View (Flag187) +-- Has_Constrained_Partial_View (Flag187) [base type only] -- Defined in private type and their completions, when the private -- type has no discriminants and the full view has discriminants with -- defaults. In Ada 2005 heap-allocated objects of such types are not -- 2.30.2