From 3c6e62b75293b6625509ade3c278fc2d4d147c30 Mon Sep 17 00:00:00 2001 From: Alexander Foremny Date: Thu, 7 Dec 2023 03:55:45 +0100 Subject: chore: increase performance by caching everything Initial cache generation is slower, as we are losing out on parallelism. --- app/History/IssueEvent.hs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'app/History/IssueEvent.hs') diff --git a/app/History/IssueEvent.hs b/app/History/IssueEvent.hs index 93bd133..932cfd9 100644 --- a/app/History/IssueEvent.hs +++ b/app/History/IssueEvent.hs @@ -1,5 +1,7 @@ module History.IssueEvent (IssueEvent (..)) where +import Data.Binary (Binary) +import GHC.Generics (Generic) import History.CommitHash (CommitHash) import Issue (Issue) import Issue.Render qualified as I @@ -24,7 +26,7 @@ data IssueEvent issue :: Issue, patch :: Patch } - deriving (Show) + deriving (Show, Generic, Binary) instance P.Render IssueEvent where render = P.render . P.Detailed -- cgit v1.2.3