aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/vhdl/sem_scopes.adb4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/vhdl/sem_scopes.adb b/src/vhdl/sem_scopes.adb
index 0d87c9584..91408554b 100644
--- a/src/vhdl/sem_scopes.adb
+++ b/src/vhdl/sem_scopes.adb
@@ -1499,8 +1499,10 @@ package body Sem_Scopes is
if Is_Potentially_Visible (Inter) then
Put (" (use)");
end if;
- Put (": ");
+ Put (":");
Decl := Get_Declaration (Inter);
+ Put (Iir'Image (Decl));
+ Put (':');
Put (Iir_Kind'Image (Get_Kind (Decl)));
Put_Line (", loc: " & Image (Get_Location (Decl)));
if Get_Kind (Decl) in Iir_Kinds_Subprogram_Declaration then