diff options
Diffstat (limited to 'src/simul/simul-vhdl_simul.ads')
| -rw-r--r-- | src/simul/simul-vhdl_simul.ads | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/simul/simul-vhdl_simul.ads b/src/simul/simul-vhdl_simul.ads index f2cf98212..66a032f22 100644 --- a/src/simul/simul-vhdl_simul.ads +++ b/src/simul/simul-vhdl_simul.ads @@ -48,6 +48,10 @@ package Simul.Vhdl_Simul is -- State associed with each process. type Process_State_Type (Kind : Process_Kind := Kind_Process) is record + -- True if the process has a suspend state. + -- (Used for procedure calls) + Has_State : Boolean; + -- The process instance. Top_Instance : Synth_Instance_Acc := null; Proc : Node := Null_Node; |