diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-04-22 18:52:52 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-04-22 21:31:26 +0200 |
commit | b7992d8601cac632b75897182fb529c9409105ea (patch) | |
tree | 7cedef452e230409016f786860c8a3f7bce4dcab /src/vhdl/vhdl-sem_lib.ads | |
parent | d78d7477758f7212890daabcb53b9e2852a3f41a (diff) | |
download | ghdl-b7992d8601cac632b75897182fb529c9409105ea.tar.gz ghdl-b7992d8601cac632b75897182fb529c9409105ea.tar.bz2 ghdl-b7992d8601cac632b75897182fb529c9409105ea.zip |
find_top_entity: add location to report errors. Fix #1254
Diffstat (limited to 'src/vhdl/vhdl-sem_lib.ads')
-rw-r--r-- | src/vhdl/vhdl-sem_lib.ads | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/vhdl/vhdl-sem_lib.ads b/src/vhdl/vhdl-sem_lib.ads index 97803d8c3..0469b4ff5 100644 --- a/src/vhdl/vhdl-sem_lib.ads +++ b/src/vhdl/vhdl-sem_lib.ads @@ -30,13 +30,16 @@ package Vhdl.Sem_Lib is -- Load, parse, analyze, back-end a design_unit if necessary. -- Check Design_Unit is not obsolete. -- LOC is the location where the design unit was needed, in case of error. + procedure Load_Design_Unit + (Design_Unit: Iir_Design_Unit; Loc : Location_Type); procedure Load_Design_Unit (Design_Unit: Iir_Design_Unit; Loc : Iir); -- Load and parse DESIGN_UNIT. -- Contrary to Load_Design_Unit, the design_unit is not analyzed. -- Also, the design_unit must not have been already loaded. -- Used almost only by Load_Design_Unit. - procedure Load_Parse_Design_Unit (Design_Unit: Iir_Design_Unit; Loc : Iir); + procedure Load_Parse_Design_Unit + (Design_Unit: Iir_Design_Unit; Loc : Location_Type); -- Load an already analyzed primary unit NAME from library LIBRARY -- and compile it. |