From 694a4d2744f252b326121c37c2271133e0ec535f Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Mon, 21 Jul 2014 07:47:19 +0200
Subject: Add overflow literal.

---
 iirs_utils.ads | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'iirs_utils.ads')

diff --git a/iirs_utils.ads b/iirs_utils.ads
index b628aec8d..fb3e1b45f 100644
--- a/iirs_utils.ads
+++ b/iirs_utils.ads
@@ -101,6 +101,9 @@ package Iirs_Utils is
    function Get_Block_From_Block_Specification (Block_Spec : Iir)
      return Iir;
 
+   --  Return the identifier of the entity for architecture ARCH.
+   function Get_Entity_Identifier_Of_Architecture (Arch : Iir) return Name_Id;
+
    --  Return the bound type of a string type, ie the type of the (first)
    --  dimension of a one-dimensional array type.
    function Get_String_Type_Bound_Type (Sub_Type : Iir) return Iir;
-- 
cgit v1.2.3