diff options
author | Tristan Gingold | 2016-01-17 06:53:01 +0100 |
---|---|---|
committer | Tristan Gingold | 2016-01-19 19:54:40 +0100 |
commit | 1e2aeb2a4635f24c60384232e319b682b0d99f3c (patch) | |
tree | f0717eb0065cc1adbd397e69957959826d809a81 /src/vhdl/nodes_meta.adb | |
parent | 8e2468448947c7e1567cc50035a483c2ebd7b9d9 (diff) | |
download | ghdl-1e2aeb2a4635f24c60384232e319b682b0d99f3c.tar.gz ghdl-1e2aeb2a4635f24c60384232e319b682b0d99f3c.tar.bz2 ghdl-1e2aeb2a4635f24c60384232e319b682b0d99f3c.zip |
Clean up some code and comments about constant declarations.
Diffstat (limited to 'src/vhdl/nodes_meta.adb')
-rw-r--r-- | src/vhdl/nodes_meta.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/vhdl/nodes_meta.adb b/src/vhdl/nodes_meta.adb index 6c2ccd5..c1725ea 100644 --- a/src/vhdl/nodes_meta.adb +++ b/src/vhdl/nodes_meta.adb @@ -1646,7 +1646,7 @@ package body Nodes_Meta is when Field_Default_Value => return Attr_Maybe_Ref; when Field_Deferred_Declaration => - return Attr_None; + return Attr_Ref; when Field_Deferred_Declaration_Flag => return Attr_None; when Field_Shared_Flag => @@ -2923,11 +2923,11 @@ package body Nodes_Meta is Field_Expr_Staticness, Field_Name_Staticness, Field_Chain, - Field_Deferred_Declaration, Field_Default_Value, Field_Subtype_Indication, Field_Parent, Field_Type, + Field_Deferred_Declaration, -- Iir_Kind_Iterator_Declaration Field_Identifier, Field_Has_Identifier_List, |