1 files changed, 0 insertions, 5 deletions
diff --git a/parse.adb b/parse.adb
index 51e04e0a8..22a536ca8 100644
--- a/parse.adb
+++ b/parse.adb
@@ -3435,11 +3435,6 @@ package body Parse is
          Location_Copy (A_Choice, Expr1);
          Set_Expression (A_Choice, Parse_Range_Right (Expr1));
          return A_Choice;
---       elsif Get_Kind (Expr1) in Iir_Kinds_Name then
---          A_Choice := Create_Iir (Iir_Kind_Choice_By_Name);
---          Location_Copy (A_Choice, Expr1);
---          Set_Name (A_Choice, Parse_Range_Type_Expression (Expr1));
---          return A_Choice;
       else
          A_Choice := Create_Iir (Iir_Kind_Choice_By_Expression);
          Location_Copy (A_Choice, Expr1);