diff --git a/tuareg.el b/tuareg.el
index 388c4ca..bfcb651 100644
--- a/tuareg.el
+++ b/tuareg.el
@@ -2210,10 +2210,11 @@ Return values can be
          (and (not (smie-rule-bolp))
               (cond ((smie-rule-prev-p "d=")
                      (smie-rule-parent tuareg-default-indent))
-                    ((smie-rule-prev-p "begin") (smie-rule-parent)))))
+                    ((smie-rule-prev-p "begin" "(")
+                     (smie-rule-parent)))))
         ((equal token "then") (smie-rule-parent))
         ((equal token "if") (if (and (not (smie-rule-bolp))
-                                     (smie-rule-prev-p "else"))
+                                     (smie-rule-prev-p "else" "(" "begin"))
                                 (smie-rule-parent)))
         ((and (equal token "with") (smie-rule-parent-p "{"))
          (smie-rule-parent))