Added Generic and NoThunks instances for RAWState

IntersectMBO · Nov 22, 2024 · aa03d2b · aa03d2b
1 parent acb5289
commit aa03d2b
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 1 deletion.
diff --git a/rawlock/CHANGELOG.md b/rawlock/CHANGELOG.md
@@ -2,6 +2,10 @@
 
 # Changelog entries
 
+## 0.1.1.0 -- 2024-11-22
+
+* Added `Generic` and `NoThunks` instance for `RAWState`.
+
 ## 0.1.0.0 -- 2024-10-22
 
 * First version. Released on an unsuspecting world.
diff --git a/rawlock/src/Control/RAWLock.hs b/rawlock/src/Control/RAWLock.hs
@@ -155,7 +155,7 @@ data RAWState = RAWState {
     waitingReaders   :: !Readers
   , waitingAppenders :: !Appenders
   , waitingWriters   :: !Writers
-  } deriving Show
+  } deriving (Show, Generic, NoThunks)
 
 noWriters :: Poisonable RAWState -> Bool
 noWriters (Healthy (RAWState _ _ w)) = w == 0