- MatitaTypes.status -> char Stream.t ->
- (MatitaTypes.status ->
- (CicAst.term,TacticAst.obj,string) TacticAst.statement -> unit) ->
- MatitaTypes.status
+ ?do_heavy_checks:bool ->
+ ?include_paths:string list ->
+ ?clean_baseuri:bool ->
+ MatitaTypes.status ref -> char Stream.t ->
+ (MatitaTypes.status -> statement -> unit) ->
+ unit
+
+val eval_from_stream_greedy:
+ ?do_heavy_checks:bool ->
+ ?include_paths:string list ->
+ ?clean_baseuri:bool ->
+ MatitaTypes.status ref-> char Stream.t ->
+ (MatitaTypes.status -> statement -> unit) ->
+ unit