diff options
author | Tristan Gingold <tgingold@free.fr> | 2023-02-03 07:55:09 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2023-02-03 07:55:09 +0100 |
commit | d38356d2e2213655f60ea60ef6a60af0c3c36aa0 (patch) | |
tree | e325696098351d304c039bcab04a656755a52a46 /src/vhdl/vhdl-utils.ads | |
parent | 6311bbaefc7f5ff0c4ce0092b804f2da05ded595 (diff) | |
download | ghdl-d38356d2e2213655f60ea60ef6a60af0c3c36aa0.tar.gz ghdl-d38356d2e2213655f60ea60ef6a60af0c3c36aa0.tar.bz2 ghdl-d38356d2e2213655f60ea60ef6a60af0c3c36aa0.zip |
vhdl: reduce use of is_anonymous_type_definition
Diffstat (limited to 'src/vhdl/vhdl-utils.ads')
-rw-r--r-- | src/vhdl/vhdl-utils.ads | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/src/vhdl/vhdl-utils.ads b/src/vhdl/vhdl-utils.ads index 8dba4e221..4ff81b011 100644 --- a/src/vhdl/vhdl-utils.ads +++ b/src/vhdl/vhdl-utils.ads @@ -190,10 +190,6 @@ package Vhdl.Utils is function Is_Anonymous_Type_Definition (Def : Iir) return Boolean; pragma Inline (Is_Anonymous_Type_Definition); - -- Likewise but for natures. - function Is_Anonymous_Nature_Definition (Def : Iir) return Boolean; - pragma Inline (Is_Anonymous_Nature_Definition); - -- Return TRUE iff DEF is a fully constrained type (or subtype) definition. function Is_Fully_Constrained_Type (Def : Iir) return Boolean; @@ -261,6 +257,7 @@ package Vhdl.Utils is -- Return True iff DEF defines a new subtype indication, not just an -- existing name (like a name). function Is_Proper_Subtype_Indication (Def : Iir) return Boolean; + function Is_Proper_Subnature_Indication (Def : Iir) return Boolean; -- Return True iff the subtype indication of DECL is defined/owned by -- DECL. |