From 1724499061ebbaf02809031419d34a00fee42314 Mon Sep 17 00:00:00 2001 From: Dmitry Zuikov Date: Fri, 17 May 2024 06:44:21 +0300 Subject: [PATCH] fix --- lib/Data/Config/Suckless/Syntax.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lib/Data/Config/Suckless/Syntax.hs b/lib/Data/Config/Suckless/Syntax.hs index 40ca1c0..10b9bbe 100644 --- a/lib/Data/Config/Suckless/Syntax.hs +++ b/lib/Data/Config/Suckless/Syntax.hs @@ -122,8 +122,7 @@ instance Eq (Syntax c) where (==) (List _ a) (List _ b) = a == b (==) _ _ = False -deriving instance (Data (Context ())) => Data (Syntax ()) -deriving instance (Data (Context C)) => Data (Syntax C) +deriving instance (Data c, Data (Context c)) => Data (Syntax c) instance Pretty (Syntax c) where pretty (Literal _ ast) = pretty ast