2017-05-25 19:12:29 +00:00
|
|
|
module HTTPure.HTTPureSpec where
|
|
|
|
|
2017-07-18 05:31:46 +00:00
|
|
|
import Prelude
|
2017-05-25 19:12:29 +00:00
|
|
|
|
2017-07-10 10:17:13 +00:00
|
|
|
import Test.Spec as Spec
|
|
|
|
import Test.Spec.Reporter as Reporter
|
|
|
|
import Test.Spec.Runner as Runner
|
2017-05-25 19:12:29 +00:00
|
|
|
|
2017-07-14 06:28:57 +00:00
|
|
|
import HTTPure.BodySpec as BodySpec
|
|
|
|
import HTTPure.HeadersSpec as HeadersSpec
|
2017-07-10 10:17:13 +00:00
|
|
|
import HTTPure.HTTPureMSpec as HTTPureMSpec
|
2017-07-14 06:28:57 +00:00
|
|
|
import HTTPure.PathSpec as PathSpec
|
2017-07-10 10:17:13 +00:00
|
|
|
import HTTPure.RequestSpec as RequestSpec
|
|
|
|
import HTTPure.ResponseSpec as ResponseSpec
|
|
|
|
import HTTPure.ServerSpec as ServerSpec
|
2017-07-17 23:42:13 +00:00
|
|
|
import HTTPure.StatusSpec as StatusSpec
|
2017-07-10 10:17:13 +00:00
|
|
|
import HTTPure.IntegrationSpec as IntegrationSpec
|
|
|
|
|
2017-07-14 06:28:57 +00:00
|
|
|
import HTTPure.SpecHelpers as SpecHelpers
|
|
|
|
|
2017-07-10 10:17:13 +00:00
|
|
|
main :: SpecHelpers.TestSuite
|
|
|
|
main = Runner.run [ Reporter.specReporter ] $ Spec.describe "HTTPure" do
|
2017-07-14 06:28:57 +00:00
|
|
|
BodySpec.bodySpec
|
|
|
|
HeadersSpec.headersSpec
|
2017-07-10 10:17:13 +00:00
|
|
|
HTTPureMSpec.httpureMSpec
|
2017-07-14 06:28:57 +00:00
|
|
|
PathSpec.pathSpec
|
2017-07-10 10:17:13 +00:00
|
|
|
RequestSpec.requestSpec
|
|
|
|
ResponseSpec.responseSpec
|
|
|
|
ServerSpec.serverSpec
|
2017-07-17 23:42:13 +00:00
|
|
|
StatusSpec.statusSpec
|
2017-07-10 10:17:13 +00:00
|
|
|
IntegrationSpec.integrationSpec
|