From 68cd44fa1a129178d1cf64d733245b2dea9281eb Mon Sep 17 00:00:00 2001 From: Stevan Andjelkovic Date: Fri, 4 Jun 2021 14:45:09 +0200 Subject: [PATCH] refactor(runtime): shorten import lists for test modules --- src/runtime-prototype/src/StuntDouble.hs | 9 ++++++--- src/runtime-prototype/src/StuntDouble/Frontend/Http.hs | 3 ++- src/runtime-prototype/test/StuntDouble/ActorMapTest.hs | 10 +--------- src/runtime-prototype/test/StuntDouble/FrontendTest.hs | 10 +--------- .../test/StuntDouble/TransportTest.hs | 1 - 5 files changed, 10 insertions(+), 23 deletions(-) diff --git a/src/runtime-prototype/src/StuntDouble.hs b/src/runtime-prototype/src/StuntDouble.hs index 61fc37ae..99633b42 100644 --- a/src/runtime-prototype/src/StuntDouble.hs +++ b/src/runtime-prototype/src/StuntDouble.hs @@ -1,10 +1,13 @@ module StuntDouble (module X) where -import StuntDouble.ActorMap as X import StuntDouble.Actor.State as X +import StuntDouble.ActorMap as X import StuntDouble.Datatype as X -import StuntDouble.Message as X import StuntDouble.Envelope as X +import StuntDouble.Frontend.Http as X +import StuntDouble.Message as X +import StuntDouble.Random as X +import StuntDouble.Reference as X +import StuntDouble.Time as X import StuntDouble.Transport as X import StuntDouble.Transport.Http as X -import StuntDouble.Reference as X diff --git a/src/runtime-prototype/src/StuntDouble/Frontend/Http.hs b/src/runtime-prototype/src/StuntDouble/Frontend/Http.hs index 51a2fe15..164afe6c 100644 --- a/src/runtime-prototype/src/StuntDouble/Frontend/Http.hs +++ b/src/runtime-prototype/src/StuntDouble/Frontend/Http.hs @@ -11,8 +11,9 @@ import Network.HTTP.Types.Status import qualified Network.Wai as Wai import Network.Wai.Handler.Warp -import StuntDouble import StuntDouble.ActorMap +import StuntDouble.Message +import StuntDouble.Reference ------------------------------------------------------------------------ diff --git a/src/runtime-prototype/test/StuntDouble/ActorMapTest.hs b/src/runtime-prototype/test/StuntDouble/ActorMapTest.hs index 834aa181..05b00afc 100644 --- a/src/runtime-prototype/test/StuntDouble/ActorMapTest.hs +++ b/src/runtime-prototype/test/StuntDouble/ActorMapTest.hs @@ -8,15 +8,7 @@ import Control.Concurrent.Async import Control.Exception import Test.HUnit hiding (State) -import StuntDouble.Actor.State -import StuntDouble.ActorMap -import StuntDouble.Datatype -import StuntDouble.Transport -import StuntDouble.FreeMonad -import StuntDouble.Message -import StuntDouble.Random -import StuntDouble.Reference -import StuntDouble.Time +import StuntDouble ------------------------------------------------------------------------ diff --git a/src/runtime-prototype/test/StuntDouble/FrontendTest.hs b/src/runtime-prototype/test/StuntDouble/FrontendTest.hs index ba5a1c9f..b2685612 100644 --- a/src/runtime-prototype/test/StuntDouble/FrontendTest.hs +++ b/src/runtime-prototype/test/StuntDouble/FrontendTest.hs @@ -6,15 +6,7 @@ import Control.Concurrent import Control.Concurrent.Async import Test.HUnit -import StuntDouble.ActorMap -import StuntDouble.Message -import StuntDouble.Reference -import StuntDouble.Actor.State -import StuntDouble.Datatype -import StuntDouble.Random -import StuntDouble.Time -import StuntDouble.Transport -import StuntDouble.Frontend.Http +import StuntDouble ------------------------------------------------------------------------ diff --git a/src/runtime-prototype/test/StuntDouble/TransportTest.hs b/src/runtime-prototype/test/StuntDouble/TransportTest.hs index 784f065a..74695892 100644 --- a/src/runtime-prototype/test/StuntDouble/TransportTest.hs +++ b/src/runtime-prototype/test/StuntDouble/TransportTest.hs @@ -3,7 +3,6 @@ module StuntDouble.TransportTest where import Control.Concurrent.Async import Test.HUnit -import StuntDouble.Transport import StuntDouble ------------------------------------------------------------------------