From 6b27332df29a294167fe4f5b91e2fa0a8f96c665 Mon Sep 17 00:00:00 2001
From: Rutger Broekhoff
Date: Sat, 22 Mar 2025 14:53:56 +0100
Subject: Get rid of older current account statement parser

---
 app/Data/Res.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'app/Data')

diff --git a/app/Data/Res.hs b/app/Data/Res.hs
index e8c4ca4..3806e5a 100644
--- a/app/Data/Res.hs
+++ b/app/Data/Res.hs
@@ -19,10 +19,10 @@ instance Monad (Res e) where
   (Ok v) >>= f = f v
   (Err e) >>= _ = Err e
 
-instance IsString e => MonadFail (Res e) where
+instance (IsString e) => MonadFail (Res e) where
   fail = Err . fromString
 
-instance IsString e => Alternative (Res e) where
+instance (IsString e) => Alternative (Res e) where
   empty = fail "mzero"
   m1@(Ok _) <|> _ = m1
   (Err _) <|> m2 = m2
-- 
cgit v1.2.3