From e62abb62264f7271ad5521d75a84fd689c3b49e0 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sun, 3 Dec 2017 10:27:57 +0100
Subject: simul: refactoring: scope is now the corresponding sim_info.

---
 src/vhdl/simulate/simul-debugger.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/vhdl/simulate/simul-debugger.adb')

diff --git a/src/vhdl/simulate/simul-debugger.adb b/src/vhdl/simulate/simul-debugger.adb
index 105b16e81..648e99501 100644
--- a/src/vhdl/simulate/simul-debugger.adb
+++ b/src/vhdl/simulate/simul-debugger.adb
@@ -313,7 +313,7 @@ package body Simul.Debugger is
    --  Used to debug.
    procedure Disp_Block_Instance (Instance: Block_Instance_Acc) is
    begin
-      Put_Line ("scope:" & Image (Instance.Block_Scope));
+      Put_Line ("scope:" & Image (Instance.Block_Scope.Frame_Scope));
       Put_Line ("Objects:");
       for I in Instance.Objects'Range loop
          Put (Object_Slot_Type'Image (I) & ": ");
-- 
cgit v1.2.3