diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-02 13:10:33 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-02 13:10:33 +0000 |
commit | d9f7965179885a72d801b1f2d873fe404ba40e17 (patch) | |
tree | 31260f5efb109439c9337953245e792f3b84b436 /gcc/ada/einfo.ads | |
parent | 584b61866dc5971e0b73703264f757c28dd70a2d (diff) | |
download | gcc-d9f7965179885a72d801b1f2d873fe404ba40e17.tar.gz |
2011-08-02 Robert Dewar <dewar@adacore.com>
* sem_ch3.adb, sem_ch5.adb, sem_type.adb, switch-c.adb, switch-c.ads,
sem_prag.adb, sem_util.adb, sem_util.ads, sem_res.adb, warnsw.ads,
prepcomp.ads, cstand.adb, stand.ads, a-calfor.adb, s-stusta.adb:
Minor reformatting.
2011-08-02 Ed Schonberg <schonberg@adacore.com>
* sem_attr.adb: handle properly 'Result when it is a prefix of an
indexed component.
2011-08-02 Javier Miranda <miranda@adacore.com>
* einfo.ads, einfo.adb
(Original_Access_Type): Move this attribute to Node26 since there was
an undocumented use of Node21 in E_Access_Subprogram_Type entities
which causes conflicts and breaks the generation of the .NET compiler.
(Interface_Name): Add missing documentation on JGNAT only uses of
this attribute.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@177145 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/einfo.ads')
-rw-r--r-- | gcc/ada/einfo.ads | 20 |
1 files changed, 11 insertions, 9 deletions
diff --git a/gcc/ada/einfo.ads b/gcc/ada/einfo.ads index 0366dbeb604..45dd3b4778f 100644 --- a/gcc/ada/einfo.ads +++ b/gcc/ada/einfo.ads @@ -1911,12 +1911,13 @@ package Einfo is -- instantiations. -- Interface_Name (Node21) --- Present in exceptions, functions, procedures, variables, constants, --- and packages. Set to Empty unless an export, import, or interface --- name pragma has explicitly specified an external name, in which --- case it references an N_String_Literal node for the specified --- external name. In the case of exceptions, the field is set by --- Import_Exception/Export_Exception (which can be used in OpenVMS +-- Present in constants, variables, exceptions, functions, procedures, +-- packages, components (JGNAT only), discriminants (JGNAT only), and +-- access to subprograms (JGNAT only). Set to Empty unless an export, +-- import, or interface name pragma has explicitly specified an external +-- name, in which case it references an N_String_Literal node for the +-- specified external name. In the case of exceptions, the field is set +-- by Import_Exception/Export_Exception (which can be used in OpenVMS -- versions only). Note that if this field is Empty, and Is_Imported -- or Is_Exported is set, then the default interface name is the name -- of the entity, cased in a manner that is appropriate to the system @@ -3206,7 +3207,7 @@ package Einfo is -- Optimize_Alignment (Off) mode applies to the type/object, then neither -- of the flags Optimize_Alignment_Space/Optimize_Alignment_Time is set. --- Original_Access_Type (Node21) +-- Original_Access_Type (Node26) -- Present in E_Access_Subprogram_Type entities. Set only if the access -- type was generated by the expander as part of processing an access -- to protected subprogram type. Points to the access to protected @@ -4882,8 +4883,9 @@ package Einfo is -- E_Access_Subprogram_Type -- Equivalent_Type (Node18) (remote types only) -- Directly_Designated_Type (Node20) - -- Original_Access_Type (Node21) + -- Interface_Name (Node21) (JGNAT usage only) -- Needs_No_Actuals (Flag22) + -- Original_Access_Type (Node26) -- Can_Use_Internal_Rep (Flag229) -- (plus type attributes) @@ -5004,7 +5006,7 @@ package Einfo is -- Renamed_Object (Node18) -- Size_Check_Code (Node19) (constants only) -- Prival_Link (Node20) (privals only) - -- Interface_Name (Node21) + -- Interface_Name (Node21) (constants only) -- Related_Type (Node27) (constants only) -- Has_Alignment_Clause (Flag46) -- Has_Atomic_Components (Flag86) |