Patchwork [Ada] Remove dead code in elaborate_entity

login
register
mail settings
Submitter Eric Botcazou
Date Jan. 6, 2013, 12:08 p.m.
Message ID <3339630.teYpdDJkBf@polaris>
Download mbox | patch
Permalink /patch/209746/
State New
Headers show

Comments

Eric Botcazou - Jan. 6, 2013, 12:08 p.m.
Tested on x86_64-suse-linux, applied on mainline and 4.7 branch.


2013-01-06  Eric Botcazou  <ebotcazou@adacore.com>

	* gcc-interface/decl.c (elaborate_entity) <E_Record_Type>: Delete.
Eric Botcazou - Jan. 6, 2013, 12:31 p.m.
> Tested on x86_64-suse-linux, applied on mainline and 4.7 branch.

Pasto: applied on mainline only.

Patch

Index: gcc-interface/decl.c
===================================================================
--- gcc-interface/decl.c	(revision 194942)
+++ gcc-interface/decl.c	(working copy)
@@ -5944,18 +5944,6 @@  elaborate_entity (Entity_Id gnat_entity)
       break;
       }
 
-    case E_Record_Type:
-      {
-	Node_Id full_definition = Declaration_Node (gnat_entity);
-	Node_Id record_definition = Type_Definition (full_definition);
-
-	/* If this is a record extension, go a level further to find the
-	   record definition.  */
-	if (Nkind (record_definition) == N_Derived_Type_Definition)
-	  record_definition = Record_Extension_Part (record_definition);
-      }
-      break;
-
     case E_Record_Subtype:
     case E_Private_Subtype:
     case E_Limited_Private_Subtype: