diff options
Diffstat (limited to 'Utility/TList.hs')
-rw-r--r-- | Utility/TList.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/TList.hs b/Utility/TList.hs index 4b91b767f..5532cdce5 100644 --- a/Utility/TList.hs +++ b/Utility/TList.hs @@ -57,7 +57,7 @@ modifyTList tlist a = do unless (emptyDList dl') $ putTMVar tlist dl' where - emptyDList = D.list True (\_ _ -> False) + emptyDList = D.list True (\_ _ -> False) consTList :: TList a -> a -> STM () consTList tlist v = modifyTList tlist $ \dl -> D.cons v dl |