diff options
author | Maxime Dénès <mail@maximedenes.fr> | 2017-04-11 01:16:37 +0200 |
---|---|---|
committer | Maxime Dénès <mail@maximedenes.fr> | 2017-04-11 01:16:37 +0200 |
commit | 97f1d0b6ddfce894941d34fc3b3e4c4df0efadd2 (patch) | |
tree | 81454b4f7f8b78bbb4376ea38f2777e76ce7252f /plugins/nsatz/utile.ml | |
parent | 351b4e0d2d7fa9b1ed853e9d834993ee24a1a130 (diff) | |
parent | 9aa27e4554c607ea9bd94c999bf828c2874cf22a (diff) |
Merge PR#532: Clean Nsatz implementation.
Diffstat (limited to 'plugins/nsatz/utile.ml')
-rw-r--r-- | plugins/nsatz/utile.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/plugins/nsatz/utile.ml b/plugins/nsatz/utile.ml index 922432460..d3cfd75e5 100644 --- a/plugins/nsatz/utile.ml +++ b/plugins/nsatz/utile.ml @@ -11,8 +11,8 @@ let prt0 s = () (* print_string s;flush(stdout)*) let prt s = if !Flags.debug then (print_string (s^"\n");flush(stdout)) else () -let info s = - Flags.if_verbose prerr_string s +let sinfo s = if !Flags.debug then Feedback.msg_debug (Pp.str s) +let info s = if !Flags.debug then Feedback.msg_debug (Pp.str (s ())) (* Lists *) |