diff options
author | Tristan Gingold <tgingold@free.fr> | 2021-12-13 19:09:44 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2021-12-13 19:09:44 +0100 |
commit | 8d75953b65e81e404ea193b8994c638b5a8c470d (patch) | |
tree | 35478e6c539c19c79ae276a134d5ac59ad127667 /src/vhdl/vhdl-configuration.ads | |
parent | 6bcba53d0fc8d4e6e168470ecb8216bbb87534ca (diff) | |
download | ghdl-8d75953b65e81e404ea193b8994c638b5a8c470d.tar.gz ghdl-8d75953b65e81e404ea193b8994c638b5a8c470d.tar.bz2 ghdl-8d75953b65e81e404ea193b8994c638b5a8c470d.zip |
ghdldrv: handle generic overrides on foreign units
Diffstat (limited to 'src/vhdl/vhdl-configuration.ads')
-rw-r--r-- | src/vhdl/vhdl-configuration.ads | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/vhdl/vhdl-configuration.ads b/src/vhdl/vhdl-configuration.ads index d272d23e9..dfd59c516 100644 --- a/src/vhdl/vhdl-configuration.ads +++ b/src/vhdl/vhdl-configuration.ads @@ -69,8 +69,12 @@ package Vhdl.Configuration is type Mark_Instantiated_Units_Access is access procedure (N : Int32); Mark_Foreign_Module : Mark_Instantiated_Units_Access; + type Apply_Foreign_Override_Access is access procedure + (Top : Int32; Gen : String; Value : String); + Apply_Foreign_Override : Apply_Foreign_Override_Access; + -- Add an override for generic ID. - procedure Add_Generic_Override (Id : Name_Id; Value : String); + procedure Add_Generic_Override (Name : String; Value : String); -- Apply generic overrides to entity ENT. procedure Apply_Generic_Override (Ent : Iir); |