diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-07-29 15:20:26 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-07-29 15:20:26 +0200 |
| commit | f8c79ade9e03c5278cb4858d6e46695683e1c1ff (patch) | |
| tree | 0c0fb55c2de502e6ce69b8951a0c875da3b4a644 /gcc/ada/lib-xref.ads | |
| parent | b329a739f8026e4d1ace1e7113c96b99e3193e17 (diff) | |
| download | gcc-f8c79ade9e03c5278cb4858d6e46695683e1c1ff.zip gcc-f8c79ade9e03c5278cb4858d6e46695683e1c1ff.tar.gz gcc-f8c79ade9e03c5278cb4858d6e46695683e1c1ff.tar.bz2 | |
[multiple changes]
2014-07-29 Olivier Hainque <hainque@adacore.com>
* g-debpoo.adb
(Default_Alignment): Rename as Storage_Alignment. This is not
a "default" that can be overriden. Augment comment to clarify
intent and document why we need to manage alignment padding.
(Header_Offset): Set to Header'Object_Size instead of 'Size
rounded up to Storage_Alignment. Storage_Alignment on the
allocation header is not required by our internals so was
overkill. 'Object_Size is enough to ensure proper alignment
of the header address when substracted from a storage address
aligned on Storage_Alignment.
(Minimum_Allocation): Rename as Extra_Allocation, conveying that
this is always added on top of the incoming allocation requests.
(Align): New function, to perform alignment rounding operations.
(Allocate): Add comments on the Storage_Address computation
scheme and adjust so that the alignment padding applies to that
(Storage_Address) only.
2014-07-29 Robert Dewar <dewar@adacore.com>
* exp_ch3.adb (Default_Initialize_Object): Remove incorrect
pragma Unreferenced.
* cstand.adb (Create_Standard): Use E_Array_Type for standard
string types. Make sure index of Any_String/Any_Array is in a list.
* errout.adb: Minor reformatting.
From-SVN: r213169
Diffstat (limited to 'gcc/ada/lib-xref.ads')
| -rw-r--r-- | gcc/ada/lib-xref.ads | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/gcc/ada/lib-xref.ads b/gcc/ada/lib-xref.ads index 17733a0..b82f4b8 100644 --- a/gcc/ada/lib-xref.ads +++ b/gcc/ada/lib-xref.ads @@ -502,14 +502,18 @@ package Lib.Xref is E_Signed_Integer_Subtype => 'I', E_Signed_Integer_Type => 'I', E_String_Literal_Subtype => ' ', - E_String_Subtype => 'S', - E_String_Type => 'S', E_Subprogram_Type => ' ', E_Task_Subtype => 'T', E_Task_Type => 'T', E_Variable => '*', E_Void => ' ', + -- These are dummy entries which can be removed when we finally get + -- rid of these obsolete entries once and for all. + + E_String_Type => ' ', + E_String_Subtype => ' ', + -- The following entities are not ones to which we gather the cross- -- references, since it does not make sense to do so (e.g. references to -- a package are to the spec, not the body) Indeed the occurrence of the |