Merge branch 'master' of ssh://matita.cs.unibo.it:/srv/git/helm

[helm.git] / matita / components / disambiguation / multiPassDisambiguator.ml

diff --git a/matita/components/disambiguation/multiPassDisambiguator.ml b/matita/components/disambiguation/multiPassDisambiguator.ml
index d3250c2fe144b911fb3f43778db785d57bec23f0..b1cf9aed0ec55f13e3317489b8e9f63e044d1ffe 100644 (file)
--- a/matita/components/disambiguation/multiPassDisambiguator.ml
+++ b/matita/components/disambiguation/multiPassDisambiguator.ml
@@ -51,6 +51,8 @@ let passes () = (* <fresh_instances?, aliases, coercions?> *)
       (* for demo to reduce the number of interpretations *)
     (true, `Library, true);
   ]
+ else if !debug then
+  [ (true, `Multi, true); ]
  else
   [ (true, `Mono, false);
     (true, `Multi, false);