diff options
| author | Tristan Gingold <tgingold@free.fr> | 2022-09-30 06:18:59 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2022-09-30 06:18:59 +0200 |
| commit | 80e6b48eb30679cb884baebc990b3cc8492bbe72 (patch) | |
| tree | 72c89411ffa1e6a91115ee0fa83dcaf8da9e288c /src/libraries.adb | |
| parent | 91a072a3795dd2533d13f8434aa03cc06000ff7a (diff) | |
| download | ghdl-80e6b48eb30679cb884baebc990b3cc8492bbe72.tar.gz ghdl-80e6b48eb30679cb884baebc990b3cc8492bbe72.tar.bz2 ghdl-80e6b48eb30679cb884baebc990b3cc8492bbe72.zip | |
libraries.adb: do not set location of entity name of architecture.
As the location was the one from the library file, which is unloaded.
Diffstat (limited to 'src/libraries.adb')
| -rw-r--r-- | src/libraries.adb | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/src/libraries.adb b/src/libraries.adb index bc3d44d83..aa0e6c593 100644 --- a/src/libraries.adb +++ b/src/libraries.adb @@ -576,7 +576,6 @@ package body Libraries is Scan_Expect (Tok_Identifier); Ent := Create_Iir (Iir_Kind_Simple_Name); Set_Identifier (Ent, Current_Identifier); - Set_Location (Ent, Get_Token_Location); Set_Entity_Name (Library_Unit, Ent); end; end if; |