diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-07-22 06:57:46 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-07-22 22:23:00 +0200 |
commit | d8a81db96f512c0d58b554df294f4acb0915d6a9 (patch) | |
tree | 2d1bdd2f3ee9e225adda728e8a3c6eff54ffb78c /src/vhdl/vhdl-sem_decls.adb | |
parent | 4b862ddc4d81ff8b60bbc78eeb26d4221bfd52d8 (diff) | |
download | ghdl-d8a81db96f512c0d58b554df294f4acb0915d6a9.tar.gz ghdl-d8a81db96f512c0d58b554df294f4acb0915d6a9.tar.bz2 ghdl-d8a81db96f512c0d58b554df294f4acb0915d6a9.zip |
vhdl: replace base_type with parent_type in nodes
Only for subtype definition and remove base_type in type definitions.
Allows to better track the addition of contraints.
Diffstat (limited to 'src/vhdl/vhdl-sem_decls.adb')
-rw-r--r-- | src/vhdl/vhdl-sem_decls.adb | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/src/vhdl/vhdl-sem_decls.adb b/src/vhdl/vhdl-sem_decls.adb index d85a0631a..8b365a225 100644 --- a/src/vhdl/vhdl-sem_decls.adb +++ b/src/vhdl/vhdl-sem_decls.adb @@ -552,7 +552,6 @@ package body Vhdl.Sem_Decls is Set_Location (Def, Get_Location (Inter)); Set_Type_Declarator (Def, Inter); Set_Type (Inter, Def); - Set_Base_Type (Def, Def); Set_Type_Staticness (Def, None); Set_Resolved_Flag (Def, False); Set_Signal_Type_Flag (Def, True); @@ -704,7 +703,6 @@ package body Vhdl.Sem_Decls is Def := Create_Iir (Iir_Kind_Incomplete_Type_Definition); Location_Copy (Def, Decl); Set_Type_Definition (Decl, Def); - Set_Base_Type (Def, Def); Set_Signal_Type_Flag (Def, True); Set_Type_Declarator (Def, Decl); Set_Visible_Flag (Decl, True); |