Merge pull request #317 from DemiMarie/patch-1

Indent parenthesized if and match expressions properly
ocaml · Feb 28, 2025 · 1600fda · 1600fda
2 parents f661844 + 10bfb61
commit 1600fda
Showing 1 changed file with 3 additions and 2 deletions.
diff --git 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))