summaryrefslogtreecommitdiff
path: root/gcc/ada/einfo.ads
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2011-08-02 13:10:33 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2011-08-02 13:10:33 +0000
commitd9f7965179885a72d801b1f2d873fe404ba40e17 (patch)
tree31260f5efb109439c9337953245e792f3b84b436 /gcc/ada/einfo.ads
parent584b61866dc5971e0b73703264f757c28dd70a2d (diff)
downloadgcc-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.ads20
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)