diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-04 10:03:49 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-04 10:03:49 +0000 |
| commit | 211a13f156825160b9e273d08c93caf7941cda78 (patch) | |
| tree | 839aeecfdf5bb0318d6cec13a66c77b3430e4ce1 /gcc/ada/stand.ads | |
| parent | fd3e6972952a6ee4de6ea5efe6d53b1a8f7ac999 (diff) | |
| download | gcc-211a13f156825160b9e273d08c93caf7941cda78.tar.gz | |
2011-08-04 Yannick Moy <moy@adacore.com>
* alfa.adb, alfa.ads (Get_Entity_For_Decl): remove function, partial
duplicate of Defining_Entity
(Get_Unique_Entity_For_Decl): rename function into
Unique_Defining_Entity
* einfo.adb, einfo.ads (Is_In_ALFA, Body_Is_In_ALFA): remove flags
(Formal_Proof_On): remove synthesized flag
* cstand.adb, sem_ch11.adb, sem_ch2.adb, sem_ch3.adb, sem_ch4.adb,
sem_ch5.adb, sem_ch6.adb, sem_ch9.adb, sem_res.adb, sem_util.adb,
sem_util.ads, stand.ads: Remove treatment associated to entities in ALFA
* sem_prag.adb (Analyze_Pragma): remove special treatment for pragma
Annotate (Formal_Proof)
2011-08-04 Emmanuel Briot <briot@adacore.com>
* prj-env.adb (Create_Config_Pragmas_File): fix handling of multi-unit
source files with non-standard naming schemes, in imported projects
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@177353 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/stand.ads')
| -rw-r--r-- | gcc/ada/stand.ads | 29 |
1 files changed, 0 insertions, 29 deletions
diff --git a/gcc/ada/stand.ads b/gcc/ada/stand.ads index 07c86b65ecf..d369b40ac73 100644 --- a/gcc/ada/stand.ads +++ b/gcc/ada/stand.ads @@ -313,35 +313,6 @@ package Stand is Boolean_Literals : array (Boolean) of Entity_Id; -- Entities for the two boolean literals, used by the expander - -- Standard types which are in ALFA are associated set to True - - Standard_Type_Is_In_ALFA : array (S_Types) of Boolean := - (S_Boolean => True, - - S_Short_Short_Integer => True, - S_Short_Integer => True, - S_Integer => True, - S_Long_Integer => True, - S_Long_Long_Integer => True, - - S_Natural => True, - S_Positive => True, - - S_Short_Float => False, - S_Float => False, - S_Long_Float => False, - S_Long_Long_Float => False, - - S_Character => False, - S_Wide_Character => False, - S_Wide_Wide_Character => False, - - S_String => False, - S_Wide_String => False, - S_Wide_Wide_String => False, - - S_Duration => False); - ------------------------------------- -- Semantic Phase Special Entities -- ------------------------------------- |