From f3b8d9b74ccd24521a9f15fe4bd47ab30830abfb Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Sun, 14 Jul 2019 05:58:05 +0200 Subject: Make all exports explicit --- tests/Test/StarWars/Data.hs | 18 +++++++++++++++++- tests/Test/StarWars/Schema.hs | 8 +++++++- 2 files changed, 24 insertions(+), 2 deletions(-) (limited to 'tests/Test') diff --git a/tests/Test/StarWars/Data.hs b/tests/Test/StarWars/Data.hs index 5ceeb82..55ff207 100644 --- a/tests/Test/StarWars/Data.hs +++ b/tests/Test/StarWars/Data.hs @@ -1,5 +1,21 @@ {-# LANGUAGE OverloadedStrings #-} -module Test.StarWars.Data where +module Test.StarWars.Data + ( Character + , appearsIn + , artoo + , getDroid + , getDroid' + , getEpisode + , getFriends + , getHero + , getHeroIO + , getHuman + , id_ + , homePlanet + , name + , secretBackstory + , typeName + ) where import Data.Monoid (mempty) import Control.Applicative ( Alternative(..) diff --git a/tests/Test/StarWars/Schema.hs b/tests/Test/StarWars/Schema.hs index 3cc34fd..101bbdf 100644 --- a/tests/Test/StarWars/Schema.hs +++ b/tests/Test/StarWars/Schema.hs @@ -1,6 +1,12 @@ {-# LANGUAGE LambdaCase #-} {-# LANGUAGE OverloadedStrings #-} -module Test.StarWars.Schema where +module Test.StarWars.Schema + ( character + , droid + , hero + , human + , schema + ) where import Control.Monad.Trans.Except (throwE) import Control.Monad.Trans.Class (lift) -- cgit v1.2.3