fix: mulithreading
This commit is contained in:
parent
6d4c0f73e5
commit
491dc6c569
5 changed files with 25 additions and 10 deletions
|
@ -1,6 +1,6 @@
|
|||
{-# LANGUAGE DeriveGeneric #-}
|
||||
|
||||
module Types.RoomData (RoomData, RoomsData, sameName, roomNotEmpty, prettyPrintOpenedRoom) where
|
||||
module Types.RoomData (RoomData, RoomsStateDiff, RoomsData, sameName, roomNotEmpty, prettyPrintOpenedRoom) where
|
||||
|
||||
import ClassyPrelude
|
||||
import Data.Aeson (FromJSON, ToJSON)
|
||||
|
@ -26,6 +26,8 @@ type RoomName = Text
|
|||
|
||||
type RoomsData = [RoomData]
|
||||
|
||||
type RoomsStateDiff = (RoomsData, RoomsData)
|
||||
|
||||
instance ToJSON RoomData
|
||||
|
||||
instance FromJSON RoomData
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue