Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

cosmetic

  • Loading branch information...
commit be75b77e62b6c6de597b9021b1a25c1924e2dc5e 1 parent 96f28d3
@hyperthunk hyperthunk authored
Showing with 12 additions and 12 deletions.
  1. +12 −12 distributed-process/tests/TestStats.hs
View
24 distributed-process/tests/TestStats.hs
@@ -2,13 +2,12 @@
{-# OPTIONS_GHC -fno-warn-orphans #-}
module Main where
-import Prelude hiding (catch, log)
-import Test.Framework
- ( Test
- , defaultMain
- , testGroup
+import Control.Concurrent.MVar
+ ( MVar
+ , newEmptyMVar
+ , putMVar
+ , takeMVar
)
-import Network.Transport.TCP
import Control.Distributed.Process
import Control.Distributed.Process.Node
( forkProcess
@@ -16,14 +15,15 @@ import Control.Distributed.Process.Node
, initRemoteTable
, closeLocalNode
, LocalNode)
-import Control.Concurrent.MVar
- ( MVar
- , newEmptyMVar
- , putMVar
- , takeMVar
- )
import Data.Binary()
import Data.Typeable()
+import Network.Transport.TCP
+import Prelude hiding (catch, log)
+import Test.Framework
+ ( Test
+ , defaultMain
+ , testGroup
+ )
import Test.HUnit (Assertion)
import Test.HUnit.Base (assertBool)
import Test.Framework.Providers.HUnit (testCase)
Please sign in to comment.
Something went wrong with that request. Please try again.