aboutsummaryrefslogtreecommitdiffhomepage
path: root/ide/ideutils.ml
diff options
context:
space:
mode:
authorGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2014-06-25 17:04:35 +0200
committerGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2014-06-25 17:04:35 +0200
commit753b8f4aaa78fe1cf8ea033d8cf45e88b5da9d13 (patch)
tree66ef0fdf8f9152d0740b1f875d80343bac1ae4af /ide/ideutils.ml
parent0a829ad04841d0973b22b4407b95f518276b66e7 (diff)
all coqide specific files moved into ide/
lib/interface split into: - lib/feedback subscribe-based feedback bus (also used by coqidetop) - ide/interface definition of coqide protocol messages lib/pp structured info/err/warn messages lib/serialize split into: - lib/serialize generic xml serialization (list, pairs, int, loc, ...) used by coqide but potentially useful to other interfaces - ide/xmlprotocol serialization of protocol messages as in ide/interface the only drawback is that coqidetop needs -thread and I had to pass that option to all files in ide/
Diffstat (limited to 'ide/ideutils.ml')
-rw-r--r--ide/ideutils.ml12
1 files changed, 6 insertions, 6 deletions
diff --git a/ide/ideutils.ml b/ide/ideutils.ml
index d8ca34f98..32d2bb97b 100644
--- a/ide/ideutils.ml
+++ b/ide/ideutils.ml
@@ -272,15 +272,15 @@ let textview_width (view : #GText.view_skel) =
let char_width = GPango.to_pixels metrics#approx_char_width in
pixel_width / char_width
-type logger = Interface.message_level -> string -> unit
+type logger = Pp.message_level -> string -> unit
let default_logger level message =
let level = match level with
- | Interface.Debug _ -> `DEBUG
- | Interface.Info -> `INFO
- | Interface.Notice -> `NOTICE
- | Interface.Warning -> `WARNING
- | Interface.Error -> `ERROR
+ | Pp.Debug _ -> `DEBUG
+ | Pp.Info -> `INFO
+ | Pp.Notice -> `NOTICE
+ | Pp.Warning -> `WARNING
+ | Pp.Error -> `ERROR
in
Minilib.log ~level message