diff options
Diffstat (limited to 'src/vhdl/std_package.adb')
| -rw-r--r-- | src/vhdl/std_package.adb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/vhdl/std_package.adb b/src/vhdl/std_package.adb index 8143d9c63..93cee8045 100644 --- a/src/vhdl/std_package.adb +++ b/src/vhdl/std_package.adb @@ -353,6 +353,9 @@ package body Std_Package is Set_Type_Staticness (Def, None); Set_Type_Definition (Decl, Def); Set_Type_Declarator (Def, Decl); + + Set_Chain (Decl, Wildcard_Type_Declaration_Chain); + Wildcard_Type_Declaration_Chain := Decl; end Create_Wildcard_Type; begin @@ -1209,6 +1212,7 @@ package body Std_Package is -- Wilcard types. -- Create the declaration and give them meaningful (and invalid) names -- so that error messages are clear for the user. + Wildcard_Type_Declaration_Chain := Null_Iir; Create_Wildcard_Type (Wildcard_Any_Type, "any type"); Create_Wildcard_Type (Wildcard_Any_Aggregate_Type, "any aggregate type"); Create_Wildcard_Type (Wildcard_Any_String_Type, "any string type"); |