From 2eb1a71d96eb4f7ba3c4d053fdfd231ef5224138 Mon Sep 17 00:00:00 2001
From: Jens Nolte <git@queezle.net>
Date: Wed, 25 Aug 2021 02:10:17 +0200
Subject: [PATCH] Add Alternative and <|> operator to prelude
---
src/Quasar/Prelude.hs | 3 +++
1 file changed, 3 insertions(+)
diff --git a/src/Quasar/Prelude.hs b/src/Quasar/Prelude.hs
index b839e70..839d832 100644
--- a/src/Quasar/Prelude.hs
+++ b/src/Quasar/Prelude.hs
@@ -3,7 +3,9 @@ module Quasar.Prelude
module Quasar.PreludeExtras,
(>=>),
(<=<),
+ (<|>),
Control.Applicative.liftA2,
+ Control.Applicative.Alternative,
Data.Foldable.sequenceA_,
Data.Foldable.traverse_,
module Control.Concurrent.MVar,
@@ -68,6 +70,7 @@ import Prelude hiding
)
import Prelude qualified as P
+import Control.Applicative ((<|>))
import Control.Applicative qualified
import Control.Concurrent.MVar
import Control.Exception qualified
--
GitLab