From 7c3158e131467f99b45378751a8c4bac2c69f305 Mon Sep 17 00:00:00 2001
From: Carter Tazio Schonwald <carter.schonwald@gmail.com>
Date: Thu, 18 Apr 2019 12:28:31 -0400
Subject: [PATCH] make semantics consistent for monad Fail on boxed vectors
---
Data/Vector.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/Data/Vector.hs b/Data/Vector.hs
index 8b4c982..ed54bc2 100644
--- a/Data/Vector.hs
+++ b/Data/Vector.hs
@@ -355,7 +355,7 @@ instance Monad Vector where
#if !(MIN_VERSION_base(4,13,0))
{-# INLINE fail #-}
- fail = Fail.fail
+ fail _ = empty
#endif
instance Fail.MonadFail Vector where
--
GitLab