Coq.GoalsSourcetype ('a, 'pp) t = {goals : 'a list;stack : ('a list * 'a list) list;bullet : 'pp option;shelf : 'a list;given_up : 'a list;}val reify :
ppx:(Environ.env -> Evd.evar_map -> EConstr.t -> 'pp) ->
State.Proof.t ->
('pp Reified_goal.t, Pp.t) tStm-independent goal processor