From 2fc3356ae0d34dae87eb22c94f4b5eaa1873695b Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Thu, 2 Apr 2020 19:44:37 +0200
Subject: grt: add code to support systemc co-simulation.

---
 src/grt/grt-rtis.ads | 1 +
 1 file changed, 1 insertion(+)

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

diff --git a/src/grt/grt-rtis.ads b/src/grt/grt-rtis.ads
index d4664492f..eebe5c200 100644
--- a/src/grt/grt-rtis.ads
+++ b/src/grt/grt-rtis.ads
@@ -445,6 +445,7 @@ package Grt.Rtis is
 
    --  Address of the top instance.
    Ghdl_Rti_Top_Instance : Address;
+   pragma Export (C, Ghdl_Rti_Top_Instance, "__ghdl_rti_top_instance");
 
    --  Instances have a pointer to their RTI at offset 0.
    type Ghdl_Rti_Acc_Acc is access Ghdl_Rti_Access;
-- 
cgit v1.2.3