diff options
| author | Tristan Gingold <tgingold@free.fr> | 2017-12-21 18:57:01 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2017-12-21 18:57:01 +0100 |
| commit | 249491882367ab939141107f2518a05bffc08efc (patch) | |
| tree | 4d6b6ea61220c038dc2c08dd91c42b6b18cf0ac1 /src/vhdl/simulate/simul-execution.ads | |
| parent | 5fa2ef4740596fdacfc3370541548759df2ab98b (diff) | |
| download | ghdl-249491882367ab939141107f2518a05bffc08efc.tar.gz ghdl-249491882367ab939141107f2518a05bffc08efc.tar.bz2 ghdl-249491882367ab939141107f2518a05bffc08efc.zip | |
simul: Add subprogram body in frames.
Diffstat (limited to 'src/vhdl/simulate/simul-execution.ads')
| -rw-r--r-- | src/vhdl/simulate/simul-execution.ads | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/vhdl/simulate/simul-execution.ads b/src/vhdl/simulate/simul-execution.ads index 276f283e3..f85970048 100644 --- a/src/vhdl/simulate/simul-execution.ads +++ b/src/vhdl/simulate/simul-execution.ads @@ -208,4 +208,10 @@ package Simul.Execution is function Execute_Image_Attribute (Val : Iir_Value_Literal_Acc; Expr_Type : Iir) return String; + + -- Like Get_Protected_Type_Body, but also works for instances, where + -- instantiated nodes have no bodies. + -- FIXME: maybe fix the issue directly in Sem_Inst ? + function Get_Protected_Type_Body_Origin (Spec : Iir) return Iir; + end Simul.Execution; |