From 9a84d1d757f513d7b831140a40fc1905a843f3ef Mon Sep 17 00:00:00 2001
From: Alpi Rimppi <alpi.rimppi@semantum.fi>
Date: Tue, 27 Aug 2019 11:09:16 +0300
Subject: [PATCH] Made orElseM associative

gitlab #368

Change-Id: Ideb97278b16455f0bf2d130547cf1c8713897686
---
 bundles/org.simantics.scl.runtime/scl/Prelude.scl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bundles/org.simantics.scl.runtime/scl/Prelude.scl b/bundles/org.simantics.scl.runtime/scl/Prelude.scl
index f98325109..86d13fb66 100644
--- a/bundles/org.simantics.scl.runtime/scl/Prelude.scl
+++ b/bundles/org.simantics.scl.runtime/scl/Prelude.scl
@@ -75,7 +75,7 @@ infixl 6  (+), (-)
 infixl 5  (\\), (<<), (<+)
 infix  4  (!=), (<), (<=), (>=), (>)
 infixr 3  (&&), (&<&)
-infixr 2  (||), orElse, morelse
+infixr 2  (||), orElse, orElseM, morelse
 infixr 1  (>>=), (>>), (:=), (>=>)
 infixr 1  ($)
 infixl 1  catch
-- 
2.47.1