diff options
Diffstat (limited to 'src/vhdl/vhdl-post_sems.adb')
-rw-r--r-- | src/vhdl/vhdl-post_sems.adb | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-post_sems.adb b/src/vhdl/vhdl-post_sems.adb index ba5a35419..cbf508f78 100644 --- a/src/vhdl/vhdl-post_sems.adb +++ b/src/vhdl/vhdl-post_sems.adb @@ -16,6 +16,7 @@ with Types; use Types; with Std_Names; use Std_Names; with Vhdl.Sem_Specs; +with Vhdl.Std_Env; with Vhdl.Ieee.Std_Logic_1164; with Vhdl.Ieee.Vital_Timing; with Vhdl.Ieee.Numeric; @@ -58,6 +59,9 @@ package body Vhdl.Post_Sems is Vhdl.Ieee.Std_Logic_1164.Extract_Declarations (Lib_Unit); when Name_VITAL_Timing => Vhdl.Ieee.Vital_Timing.Extract_Declarations (Lib_Unit); + when Name_Numeric_Bit => + Vhdl.Ieee.Numeric.Extract_Bit_Declarations + (Lib_Unit); when Name_Numeric_Std => Vhdl.Ieee.Numeric.Extract_Std_Declarations (Lib_Unit); @@ -80,6 +84,13 @@ package body Vhdl.Post_Sems is null; end case; end if; + elsif Get_Identifier (Lib) = Name_Std then + -- This is a unit of Std. + if Get_Kind (Lib_Unit) = Iir_Kind_Package_Declaration + and then Id = Name_Env + then + Vhdl.Std_Env.Extract_Declarations (Lib_Unit); + end if; end if; -- Look for VITAL attributes. |