diff options
Diffstat (limited to 'plugins/funind')
| -rw-r--r-- | plugins/funind/glob_term_to_relation.ml | 4 | ||||
| -rw-r--r-- | plugins/funind/invfun.ml | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/plugins/funind/glob_term_to_relation.ml b/plugins/funind/glob_term_to_relation.ml index d1fc8ef33d..a169c28260 100644 --- a/plugins/funind/glob_term_to_relation.ml +++ b/plugins/funind/glob_term_to_relation.ml @@ -16,10 +16,10 @@ let observe strm = if do_observe () then Pp.msgnl strm else () -let observennl strm = +(*let observennl strm = if do_observe () then Pp.msg strm - else () + else ()*) type binder_type = diff --git a/plugins/funind/invfun.ml b/plugins/funind/invfun.ml index b0897c61e5..b463b6c27b 100644 --- a/plugins/funind/invfun.ml +++ b/plugins/funind/invfun.ml @@ -55,10 +55,10 @@ let observe strm = then Pp.msgnl strm else () -let observennl strm = +(*let observennl strm = if do_observe () then begin Pp.msg strm;Pp.pp_flush () end - else () + else ()*) let do_observe_tac s tac g = |