snapshot, almost working

[helm.git] / helm / ocaml / cic_disambiguation / pa_unicode_macro.ml

diff --git a/helm/ocaml/cic_disambiguation/pa_unicode_macro.ml b/helm/ocaml/cic_disambiguation/pa_unicode_macro.ml
index afc9f63afb142e188bc2972bc467ff7a46267d2b..b1a9153ca754d618cdd0034fbfc90e7a5ede65a0 100644 (file)
--- a/helm/ocaml/cic_disambiguation/pa_unicode_macro.ml
+++ b/helm/ocaml/cic_disambiguation/pa_unicode_macro.ml
@@ -24,7 +24,7 @@
  *)
 
 let debug = false
-let debug_print = if debug then prerr_endline else ignore
+let debug_print s = if debug then prerr_endline s
 
 let loc = (0, 0)