Parameter External.Call_stack
type stack_element = {
pid : string;
arguments : vt list;
store : store_t option;
loop_ids : string list;
ret_var : Gillian.Gil_syntax.Var.t;
call_index : int;
continue_index : int;
error_index : int option;
}
val stack_element_of_yojson :
Yojson.Safe.t ->
stack_element Ppx_deriving_yojson_runtime.error_or
val to_yojson : t -> Yojson.Safe.t
val of_yojson : Yojson.Safe.t -> t Ppx_deriving_yojson_runtime.error_or
val push :
t ->
pid:string ->
arguments:vt list ->
?store:store_t ->
loop_ids:string list ->
ret_var:Gillian.Gil_syntax.Var.t ->
call_index:int ->
continue_index:int ->
?error_index:int ->
unit ->
t
val get_cur_proc_id : t -> string
val get_cur_args : t -> vt list
val get_loop_ids : t -> string list
val get_cur_procs : t -> string list
val recursive_depth : t -> string -> int
val pp : Stdlib.Format.formatter -> t -> unit