diff options
Diffstat (limited to 'src/vhdl/vhdl-nodes.ads')
| -rw-r--r-- | src/vhdl/vhdl-nodes.ads | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/src/vhdl/vhdl-nodes.ads b/src/vhdl/vhdl-nodes.ads index 65aadfa76..a791c532c 100644 --- a/src/vhdl/vhdl-nodes.ads +++ b/src/vhdl/vhdl-nodes.ads @@ -1542,6 +1542,8 @@ package Vhdl.Nodes is -- -- Get/Set_Identifier (Field3) -- + -- Those fields are set only for the interface package in uninstantiated + -- units. -- Get/Set_Uninstantiated_Package_Name (Field7) -- -- Get/Set_Uninstantiated_Package_Decl (Field9) @@ -1554,10 +1556,13 @@ package Vhdl.Nodes is -- -- Get/Set_Declaration_Chain (Field1) -- - -- Get/Set_Chain (Field2) - -- -- Get/Set_Attribute_Value_Chain (Field5) -- + -- This field is set only for interface package that has been associated. + -- Get/Set_Associated_Package (Field4) + -- + -- Get/Set_Chain (Field2) + -- -- Get/Set_Visible_Flag (Flag4) -- -- Get/Set_Is_Within_Flag (Flag5) @@ -9029,6 +9034,10 @@ package Vhdl.Nodes is function Get_Uninstantiated_Package_Decl (Inst : Iir) return Iir; procedure Set_Uninstantiated_Package_Decl (Inst : Iir; Pkg : Iir); + -- Field: Field4 Ref + function Get_Associated_Package (Inter : Iir) return Iir; + procedure Set_Associated_Package (Inter : Iir; Pkg : Iir); + -- The created pseudo-file for relocating the instantiated nodes -- (generics and declarations). -- Field: Field10 (uc) |