diff options
| author | Tristan Gingold <tgingold@free.fr> | 2019-08-29 06:55:52 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2019-08-29 06:55:52 +0200 |
| commit | 698c668481e9ca77234317bca7047efd8210c24c (patch) | |
| tree | 2853048fbd75630e90eb2f350ee19aa0517060ba /src/synth/synth-environment.ads | |
| parent | c794aaa2a7dbec514d188c28f75da181a5692992 (diff) | |
| download | ghdl-698c668481e9ca77234317bca7047efd8210c24c.tar.gz ghdl-698c668481e9ca77234317bca7047efd8210c24c.tar.bz2 ghdl-698c668481e9ca77234317bca7047efd8210c24c.zip | |
synth: add support for record types.
(WIP: need to fix regression of stmt01).
Diffstat (limited to 'src/synth/synth-environment.ads')
| -rw-r--r-- | src/synth/synth-environment.ads | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/synth/synth-environment.ads b/src/synth/synth-environment.ads index 604991dd5..6b817ff00 100644 --- a/src/synth/synth-environment.ads +++ b/src/synth/synth-environment.ads @@ -73,6 +73,11 @@ package Synth.Environment is function Get_Last_Assigned_Value (Ctxt : Builders.Context_Acc; Wid : Wire_Id) return Net; + function Get_Current_Assign_Value + (Ctxt : Builders.Context_Acc; Wid : Wire_Id; Off : Uns32; Wd : Width) + return Net; + + -- Read and write the mark flag. function Get_Wire_Mark (Wid : Wire_Id) return Boolean; procedure Set_Wire_Mark (Wid : Wire_Id; Mark : Boolean := True); |