92a8a78 · servant · git.iko.soy

git.iko.soy/servant

Explicit imports in /test.

commit92a8a78abe77fe91f4254ea29372871243d8fbd2 authorMatthias Fischmann <mf@zerobuzz.net> dateTue 6 Jan 2015, 17:57 (12 years ago) parent40b13a9

2 files changed+14−4

unifiedsplit

test/Servant/QQSpec.hs+10−1

@@ -9,9 +9,18 @@

99{-# LANGUAGE UndecidableInstances #-}

1010module Servant.QQSpec where

1111

12−import Test.Hspec

12+import Test.Hspec ( Expectation, Spec, shouldBe, it, describe )

1313

1414import Servant.API

15+ ( (:<|>),

16+ ReqBody,

17+ QueryParam,

18+ Put,

19+ Get,

20+ Post,

21+ Capture,

22+ (:>),

23+ sitemap )

1524

1625--------------------------------------------------------------------------

1726-- Types for testing

test/Servant/Utils/LinksSpec.hs+4−3

@@ -3,11 +3,13 @@

33{-# LANGUAGE TypeOperators #-}

44module Servant.Utils.LinksSpec where

6−import Test.Hspec

6+import Test.Hspec ( Spec, it, describe )

88import Servant.API

9+ ( type (:<|>), ReqBody, QueryParam, Get, Post, Capture, type (:>) )

910import Servant.QQSpec ( (~>) )

10−import Servant.Utils.Links (IsElem, IsLink)

11+import Servant.Utils.Links ( IsElem, IsLink )

12+

1113

1214type TestApi =

1315 "hello" :> Capture "name" String :> QueryParam "capital" Bool :> Get Bool

@@ -49,4 +51,3 @@ isLink = describe "IsLink" $ do

4951 it "is False of anything with captures" $ do

5052 reflected (Proxy::Proxy (IsLink NotALink)) ~> False

5153 reflected (Proxy::Proxy (IsLink NotALink2)) ~> False

52−