From: Javier Miranda Date: Fri, 13 May 2022 16:56:00 +0000 (+0000) Subject: [Ada] Update documentation of GNAT.Dynamic_Tables X-Git-Tag: basepoints/gcc-14~6267 X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=e5a850a66439fb9949bdd73eddb3cf2ed6dcfbaf;p=thirdparty%2Fgcc.git [Ada] Update documentation of GNAT.Dynamic_Tables Document that dynamic tables are defined aliased for backward compatibility. gcc/ada/ * libgnat/g-dyntab.ads (Table_Type): Update documentation. --- diff --git a/gcc/ada/libgnat/g-dyntab.ads b/gcc/ada/libgnat/g-dyntab.ads index 7cad7359518..1cf4877e1da 100644 --- a/gcc/ada/libgnat/g-dyntab.ads +++ b/gcc/ada/libgnat/g-dyntab.ads @@ -82,10 +82,6 @@ package GNAT.Dynamic_Tables is -- freely (expensive reallocation occurs only at major granularity -- chunks controlled by the allocation parameters). - -- Note: we do not make the table components aliased, since this would - -- restrict the use of table for discriminated types. If it is necessary - -- to take the access of a table element, use Unrestricted_Access. - -- WARNING: On HPPA, the virtual addressing approach used in this unit is -- incompatible with the indexing instructions on the HPPA. So when using -- this unit, compile your application with -mdisable-indexing. @@ -120,9 +116,10 @@ package GNAT.Dynamic_Tables is -- freely (expensive reallocation occurs only at major granularity -- chunks controlled by the allocation parameters). - -- Note: we do not make the table components aliased, since this would - -- restrict the use of table for discriminated types. If it is necessary - -- to take the access of a table element, use Unrestricted_Access. + -- Note: For backward compatibility we do not make the table components + -- aliased, since for Ada 95 this would have restricted the use of tables + -- for discriminated types. If it is necessary to take the access of a + -- table element, use Unrestricted_Access. type Table_Type is array (Valid_Table_Index_Type range <>) of Table_Component_Type;