diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-10-06 12:59:15 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-10-06 12:59:15 +0200 |
commit | fd7ce659ef9b61483dd40419552aa8036fa95bd0 (patch) | |
tree | 70c1e9e1bd750cbdfb0e48e7fe102d5a7ff5300c /src/synth/netlists-errors.adb | |
parent | 874ee1a5fb4c40bfc5a0b64669dfa495a8c44736 (diff) | |
download | ghdl-fd7ce659ef9b61483dd40419552aa8036fa95bd0.tar.gz ghdl-fd7ce659ef9b61483dd40419552aa8036fa95bd0.tar.bz2 ghdl-fd7ce659ef9b61483dd40419552aa8036fa95bd0.zip |
netlists: Remove Get_Name renaming for instances.
Diffstat (limited to 'src/synth/netlists-errors.adb')
-rw-r--r-- | src/synth/netlists-errors.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/synth/netlists-errors.adb b/src/synth/netlists-errors.adb index 880ae1418..0bee02e6a 100644 --- a/src/synth/netlists-errors.adb +++ b/src/synth/netlists-errors.adb @@ -68,7 +68,7 @@ package body Netlists.Errors is Inst : constant Instance := Instance (Val); begin if Format = 'n' then - Output_Name_1 (Get_Name (Inst)); + Output_Name_1 (Get_Instance_Name (Inst)); else raise Internal_Error; end if; |