diff options
| author | Tristan Gingold <tgingold@free.fr> | 2021-05-16 10:12:26 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2021-05-16 10:12:26 +0200 |
| commit | 15d517f38815e8c26e2459a8a2f3ffaa45887807 (patch) | |
| tree | 0755262ab06f7e134c77b51f2c605bf4e6740fb9 /src/vhdl/vhdl-nodes.ads | |
| parent | 919645ce03bacb136318ac96ddf920dfc267eeeb (diff) | |
| download | ghdl-15d517f38815e8c26e2459a8a2f3ffaa45887807.tar.gz ghdl-15d517f38815e8c26e2459a8a2f3ffaa45887807.tar.bz2 ghdl-15d517f38815e8c26e2459a8a2f3ffaa45887807.zip | |
vhdl: remove unused Get/Set_Alias_Declaration
Diffstat (limited to 'src/vhdl/vhdl-nodes.ads')
| -rw-r--r-- | src/vhdl/vhdl-nodes.ads | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/src/vhdl/vhdl-nodes.ads b/src/vhdl/vhdl-nodes.ads index 7d79ca43d..da01e6bc4 100644 --- a/src/vhdl/vhdl-nodes.ads +++ b/src/vhdl/vhdl-nodes.ads @@ -4310,8 +4310,6 @@ package Vhdl.Nodes is -- -- Get/Set_Type (Field1) -- - -- Get/Set_Alias_Declaration (Field2) - -- -- Get/Set_Identifier (Field3) -- -- Get/Set_Named_Entity (Field4) @@ -4328,8 +4326,6 @@ package Vhdl.Nodes is -- -- Get/Set_Type (Field1) -- - -- Get/Set_Alias_Declaration (Field2) - -- -- Get/Set_Identifier (Field3) -- -- Get/Set_Named_Entity (Field4) @@ -4346,8 +4342,6 @@ package Vhdl.Nodes is -- -- Get/Set_Type (Field1) -- - -- Get/Set_Alias_Declaration (Field2) - -- -- Get/Set_Identifier (Field3) -- -- Get/Set_Named_Entity (Field4) @@ -4379,8 +4373,6 @@ package Vhdl.Nodes is -- -- Get/Set_Type (Field1) -- - -- Get/Set_Alias_Declaration (Field2) - -- -- Get/Set_Identifier (Field3) -- -- Get/Set_Named_Entity (Field4) @@ -8788,12 +8780,6 @@ package Vhdl.Nodes is function Get_Named_Entity (Name : Iir) return Iir; procedure Set_Named_Entity (Name : Iir; Val : Iir); - -- If a name designate a non-object alias, the designated alias. - -- Named_Entity will designate the aliased entity. - -- Field: Field2 Ref - function Get_Alias_Declaration (Name : Iir) return Iir; - procedure Set_Alias_Declaration (Name : Iir; Val : Iir); - -- Field: Field2 Ref function Get_Referenced_Name (N : Iir) return Iir; procedure Set_Referenced_Name (N : Iir; Name : Iir); |