From 6e42eb07daf38213853bf4a9b9008c0e9e67f224 Mon Sep 17 00:00:00 2001
From: aspiwack
Date: Sat, 2 Nov 2013 15:34:15 +0000
Subject: Clean-up: removed redundant notations (>>-) and (>>--) from
 Proofview.Notations.

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16971 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 plugins/btauto/refl_btauto.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'plugins/btauto')

diff --git a/plugins/btauto/refl_btauto.ml b/plugins/btauto/refl_btauto.ml
index 4585468ad6..440309284e 100644
--- a/plugins/btauto/refl_btauto.ml
+++ b/plugins/btauto/refl_btauto.ml
@@ -217,7 +217,7 @@ module Btauto = struct
     Tacticals.tclFAIL 0 msg gl
 
   let try_unification env =
-    Proofview.Goal.concl >>- fun concl ->
+    Proofview.Goal.concl >>= fun concl ->
     let eq = Lazy.force eq in
     let t = decomp_term concl in
     match t with
@@ -230,7 +230,7 @@ module Btauto = struct
       Tacticals.New.tclFAIL 0 msg
 
   let tac =
-    Proofview.Goal.concl >>- fun concl ->
+    Proofview.Goal.concl >>= fun concl ->
     let eq = Lazy.force eq in
     let bool = Lazy.force Bool.typ in
     let t = decomp_term concl in
-- 
cgit v1.2.3