From 533c3e35d66131ae93e3f521c5da85ecb24b64a4 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sun, 19 Jan 2014 02:42:08 +0100
Subject: Fix obscure crash (expanded name in a homograph of an enumeration
 literal).

---
 iirs.adb | 1 +
 1 file changed, 1 insertion(+)

(limited to 'iirs.adb')

diff --git a/iirs.adb b/iirs.adb
index 332746b67..707a09fff 100644
--- a/iirs.adb
+++ b/iirs.adb
@@ -6881,6 +6881,7 @@ package body Iirs is
            | Iir_Kind_Implicit_Function_Declaration
            | Iir_Kind_Implicit_Procedure_Declaration
            | Iir_Kind_Procedure_Declaration
+           | Iir_Kind_Enumeration_Literal
            | Iir_Kind_Sensitized_Process_Statement
            | Iir_Kind_Process_Statement
            | Iir_Kind_Block_Statement
-- 
cgit v1.2.3