From fe6ff5794545ce9f7d00985b55cf9d5b18725ea0 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Fri, 5 Sep 2014 06:05:19 +0200
Subject: First run (using mcode) of OSVVM_2014_01.

---
 simulate/simulation.ads | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'simulate/simulation.ads')

diff --git a/simulate/simulation.ads b/simulate/simulation.ads
index 2ed5b9acf..b910b4306 100644
--- a/simulate/simulation.ads
+++ b/simulate/simulation.ads
@@ -54,7 +54,7 @@ package Simulation is
 
    type Guard_Instance_Acc is access Guard_Instance_Type;
 
-   function Guard_Func (Data : System.Address) return Ghdl_B2;
+   function Guard_Func (Data : System.Address) return Ghdl_B1;
    pragma Convention (C, Guard_Func);
 
    --  The entry point of the simulator.
-- 
cgit v1.2.3