diff options
Diffstat (limited to 'src/synth/elab-debugger.adb')
| -rw-r--r-- | src/synth/elab-debugger.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/synth/elab-debugger.adb b/src/synth/elab-debugger.adb index 843e111e0..819f04d9b 100644 --- a/src/synth/elab-debugger.adb +++ b/src/synth/elab-debugger.adb @@ -1035,9 +1035,9 @@ package body Elab.Debugger is Debug (Reason_Break); end Debug_Break; - procedure Debug_Time is + procedure Debug_Time (Top : Synth_Instance_Acc) is begin - Current_Instance := Root_Instance; + Current_Instance := Top; Current_Loc := Null_Node; Debug (Reason_Time); |