diff options
Diffstat (limited to 'lib/Phi/Phi.hs')
-rw-r--r-- | lib/Phi/Phi.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Phi/Phi.hs b/lib/Phi/Phi.hs index 94655d4..df71a1c 100644 --- a/lib/Phi/Phi.hs +++ b/lib/Phi/Phi.hs @@ -17,7 +17,7 @@ import Control.Monad.IO.Class import Data.Typeable -data Phi = Phi (TChan Message) +data Phi = Phi !(TChan Message) data Message = forall a. (Typeable a, Show a) => Message a deriving instance Show Message |