From e305214943ba24c32b4c4883447d14da0bbf9d02 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Tue, 5 Jul 2016 03:58:37 +0200
Subject: vhdl08: add support of case-generate statement

---
 src/grt/grt-rtis_addr.ads | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/grt/grt-rtis_addr.ads')

diff --git a/src/grt/grt-rtis_addr.ads b/src/grt/grt-rtis_addr.ads
index dd0ca1546..574f5cba5 100644
--- a/src/grt/grt-rtis_addr.ads
+++ b/src/grt/grt-rtis_addr.ads
@@ -66,8 +66,8 @@ package Grt.Rtis_Addr is
 
    --  Get the child context of if-generate statement GEN.  Return Null_Context
    --  if there is no child.
-   function Get_If_Generate_Child (Ctxt : Rti_Context; Gen : Ghdl_Rti_Access)
-                                  return Rti_Context;
+   function Get_If_Case_Generate_Child
+     (Ctxt : Rti_Context; Gen : Ghdl_Rti_Access) return Rti_Context;
 
    --  Convert a location to an address.
    function Loc_To_Addr (Depth : Ghdl_Rti_Depth;
-- 
cgit v1.2.3