aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/vhdl-post_sems.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl/vhdl-post_sems.adb')
-rw-r--r--src/vhdl/vhdl-post_sems.adb11
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.