From 8d8200d4bff3ffc44efc51ad44dccee9eb14ec6a Mon Sep 17 00:00:00 2001
From: Matthieu Sozeau
Date: Thu, 27 Jul 2017 20:32:18 +0200
Subject: Do not allow spliting in res_pf, this is reserved for pretyping

---
 proofs/clenvtac.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'proofs')

diff --git a/proofs/clenvtac.ml b/proofs/clenvtac.ml
index 544175c6d2..ba4cde6d67 100644
--- a/proofs/clenvtac.ml
+++ b/proofs/clenvtac.ml
@@ -87,7 +87,7 @@ let clenv_refine ?(with_evars=false) ?(with_classes=true) clenv =
       let evd' =
         if has_typeclass then
           Typeclasses.resolve_typeclasses ~fast_path:false ~filter:Typeclasses.all_evars
-          ~fail:(not with_evars) clenv.env clenv.evd
+          ~fail:(not with_evars) ~split:false clenv.env clenv.evd
         else clenv.evd
       in
       if has_resolvable then
-- 
cgit v1.2.3