semantic/test/Spec.hs

module Main where

import qualified AlignmentSpec
import qualified CommandSpec
import qualified Data.Functor.Classes.Ord.Generic.Spec
import qualified Data.Mergeable.Spec
import qualified Data.RandomWalkSimilarity.Spec
import qualified Data.Syntax.Assignment.Spec
import qualified DiffSpec
import qualified InterpreterSpec
import qualified PatchOutputSpec
import qualified SES.Spec
import qualified SourceSpec
import qualified TermSpec
import qualified TOCSpec
import qualified IntegrationSpec
import qualified SemanticCmdLineSpec
import qualified SemanticSpec
import Test.Hspec

main :: IO ()
main = hspec $ do
  parallel $ do
    describe "Alignment" AlignmentSpec.spec
    describe "Command" CommandSpec.spec
    describe "Data.Functor.Classes.Ord.Generic" Data.Functor.Classes.Ord.Generic.Spec.spec
    describe "Data.Mergeable" Data.Mergeable.Spec.spec
    describe "Data.RandomWalkSimilarity" Data.RandomWalkSimilarity.Spec.spec
    describe "Data.Syntax.Assignment" Data.Syntax.Assignment.Spec.spec
    describe "Diff" DiffSpec.spec
    describe "Interpreter" InterpreterSpec.spec
    describe "PatchOutput" PatchOutputSpec.spec
    describe "SES" SES.Spec.spec
    describe "Source" SourceSpec.spec
    describe "Term" TermSpec.spec
    describe "Semantic" SemanticSpec.spec
    describe "SemanticCmdLine" SemanticCmdLineSpec.spec
    describe "TOC" TOCSpec.spec
    describe "Integration" IntegrationSpec.spec
Manual spec inclusion. 2016-01-05 19:27:37 +03:00			`module Main where`

Restore AlignmentSpec to its former “glory.” 2017-02-13 20:17:46 +03:00			`import qualified AlignmentSpec`
Put both diff and parse rendering back together 2017-04-21 01:13:28 +03:00			`import qualified CommandSpec`
Test that genericLiftCompare gives equivalent behaviour to compare for product types. 2017-10-03 16:23:44 +03:00			`import qualified Data.Functor.Classes.Ord.Generic.Spec`
Stub in a spec function. 2016-07-26 10:58:14 +03:00			`import qualified Data.Mergeable.Spec`
Rename Data.Gram to Data.RandomWalkSimilarity. 2016-06-23 00:59:28 +03:00			`import qualified Data.RandomWalkSimilarity.Spec`
Refocus the existing assignment specs. 2017-04-07 19:21:45 +03:00			`import qualified Data.Syntax.Assignment.Spec`
Move Diff and Source Specs 2017-03-01 02:35:43 +03:00			`import qualified DiffSpec`
Manual spec inclusion. 2016-01-05 19:27:37 +03:00			`import qualified InterpreterSpec`
			`import qualified PatchOutputSpec`
Rename SES.Myers to SES. 2017-09-14 18:53:02 +03:00			`import qualified SES.Spec`
Move Diff and Source Specs 2017-03-01 02:35:43 +03:00			`import qualified SourceSpec`
Manual spec inclusion. 2016-01-05 19:27:37 +03:00			`import qualified TermSpec`
Add failing toc summary test and refactor removeDupes 2017-02-14 22:29:24 +03:00			`import qualified TOCSpec`
Test expression output (based on corpus spec strategy) 2017-02-22 01:02:31 +03:00			`import qualified IntegrationSpec`
s/Semantic/SemanticCmdLine 2017-04-20 00:22:24 +03:00			`import qualified SemanticCmdLineSpec`
Turn parseBlob tests back on in new Spec 2017-04-22 00:10:50 +03:00			`import qualified SemanticSpec`
Manual spec inclusion. 2016-01-05 19:27:37 +03:00			`import Test.Hspec`

			`main :: IO ()`
Combine output stats for all specs 2017-04-07 19:24:57 +03:00			`main = hspec $ do`
			`parallel $ do`
GitmonClient spec should not run in parallel 2017-03-22 00:48:47 +03:00			`describe "Alignment" AlignmentSpec.spec`
Put both diff and parse rendering back together 2017-04-21 01:13:28 +03:00			`describe "Command" CommandSpec.spec`
Stub in a module for generically-implemented Ord1 specs. 2017-10-03 16:15:45 +03:00			`describe "Data.Functor.Classes.Ord.Generic" Data.Functor.Classes.Ord.Generic.Spec.spec`
GitmonClient spec should not run in parallel 2017-03-22 00:48:47 +03:00			`describe "Data.Mergeable" Data.Mergeable.Spec.spec`
			`describe "Data.RandomWalkSimilarity" Data.RandomWalkSimilarity.Spec.spec`
Refocus the existing assignment specs. 2017-04-07 19:21:45 +03:00			`describe "Data.Syntax.Assignment" Data.Syntax.Assignment.Spec.spec`
GitmonClient spec should not run in parallel 2017-03-22 00:48:47 +03:00			`describe "Diff" DiffSpec.spec`
			`describe "Interpreter" InterpreterSpec.spec`
			`describe "PatchOutput" PatchOutputSpec.spec`
Rename SES.Myers to SES. 2017-09-14 18:53:02 +03:00			`describe "SES" SES.Spec.spec`
GitmonClient spec should not run in parallel 2017-03-22 00:48:47 +03:00			`describe "Source" SourceSpec.spec`
			`describe "Term" TermSpec.spec`
Turn parseBlob tests back on in new Spec 2017-04-22 00:10:50 +03:00			`describe "Semantic" SemanticSpec.spec`
s/Semantic/SemanticCmdLine 2017-04-20 00:22:24 +03:00			`describe "SemanticCmdLine" SemanticCmdLineSpec.spec`
GitmonClient spec should not run in parallel 2017-03-22 00:48:47 +03:00			`describe "TOC" TOCSpec.spec`
			`describe "Integration" IntegrationSpec.spec`