From a43abae8d3f70c6bb13382a4d3793e0073842674 Mon Sep 17 00:00:00 2001 From: Eric Botcazou Date: Sun, 6 Jan 2013 12:10:06 +0000 Subject: * gcc-interface/decl.c (elaborate_entity) : Delete. From-SVN: r194945 --- gcc/ada/gcc-interface/decl.c | 12 ------------ 1 file changed, 12 deletions(-) (limited to 'gcc/ada/gcc-interface') diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c index f312c7d..9a38791 100644 --- a/gcc/ada/gcc-interface/decl.c +++ b/gcc/ada/gcc-interface/decl.c @@ -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: -- cgit v1.1