T.S
module Call_stack : Call_stack.S with type vt = Val.t and type store_t = Store.t
val execute :
(Annot.t, int) Gil_syntax.Prog.t ->
State.t ->
Call_stack.t ->
int ->
string ->
string ->
Val.t list ->
int option ->
(State.t * Call_stack.t * int * int) list