diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/vhdl/sem_scopes.adb | 4 |
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 |