semantic/test/Spec.hs

module Main where

import qualified Assigning.Assignment.Spec
import qualified Data.Functor.Classes.Ord.Generic.Spec
import qualified Data.Mergeable.Spec
import qualified Data.Source.Spec
import qualified Diffing.Algorithm.RWS.Spec
import qualified Diffing.Algorithm.SES.Spec
import qualified DiffSpec
import qualified InterpreterSpec
import qualified TermSpec
import qualified TOCSpec
import qualified IntegrationSpec
import qualified Semantic.CLI.Spec
import qualified Semantic.IO.Spec
import qualified Semantic.Stat.Spec
import qualified SemanticSpec
import Test.Hspec

main :: IO ()
main = hspec $ do
  describe "Semantic.Stat" Semantic.Stat.Spec.spec
  parallel $ do
    describe "Assigning.Assignment" Assigning.Assignment.Spec.spec
    describe "Data.Functor.Classes.Ord.Generic" Data.Functor.Classes.Ord.Generic.Spec.spec
    describe "Data.Mergeable" Data.Mergeable.Spec.spec
    describe "Data.Source" Data.Source.Spec.spec
    describe "Diff" DiffSpec.spec
    describe "Diffing.Algorithm.RWS" Diffing.Algorithm.RWS.Spec.spec
    describe "Diffing.Algorithm.SES" Diffing.Algorithm.SES.Spec.spec
    describe "Interpreter" InterpreterSpec.spec
    describe "Term" TermSpec.spec
    describe "Semantic" SemanticSpec.spec
    describe "Semantic.CLI" Semantic.CLI.Spec.spec
    describe "Semantic.IO" Semantic.IO.Spec.spec
    describe "TOC" TOCSpec.spec
    describe "Integration" IntegrationSpec.spec
Manual spec inclusion. 2016-01-05 19:27:37 +03:00			`module Main where`

Rename the assignment spec. 2017-11-27 21:47:04 +03:00			`import qualified Assigning.Assignment.Spec`
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 the Source spec. 2017-11-27 21:49:52 +03:00			`import qualified Data.Source.Spec`
Rename the RWS spec. 2017-11-27 21:48:43 +03:00			`import qualified Diffing.Algorithm.RWS.Spec`
Rename the SES spec. 2017-11-27 21:51:05 +03:00			`import qualified Diffing.Algorithm.SES.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 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`
Rename the CLI spec. 2017-11-27 21:57:25 +03:00			`import qualified Semantic.CLI.Spec`
Rename the IO spec. 2017-11-27 21:52:48 +03:00			`import qualified Semantic.IO.Spec`
Rename the Stat spec. 2017-11-27 21:58:23 +03:00			`import qualified Semantic.Stat.Spec`
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`
Rename the Stat spec. 2017-11-27 21:58:23 +03:00			`describe "Semantic.Stat" Semantic.Stat.Spec.spec`
Combine output stats for all specs 2017-04-07 19:24:57 +03:00			`parallel $ do`
Rename the assignment spec. 2017-11-27 21:47:04 +03:00			`describe "Assigning.Assignment" Assigning.Assignment.Spec.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`
Rename the Source spec. 2017-11-27 21:49:52 +03:00			`describe "Data.Source" Data.Source.Spec.spec`
GitmonClient spec should not run in parallel 2017-03-22 00:48:47 +03:00			`describe "Diff" DiffSpec.spec`
Rename the RWS spec. 2017-11-27 21:48:43 +03:00			`describe "Diffing.Algorithm.RWS" Diffing.Algorithm.RWS.Spec.spec`
Rename the SES spec. 2017-11-27 21:51:05 +03:00			`describe "Diffing.Algorithm.SES" Diffing.Algorithm.SES.Spec.spec`
GitmonClient spec should not run in parallel 2017-03-22 00:48:47 +03:00			`describe "Interpreter" InterpreterSpec.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`
Rename the CLI spec. 2017-11-27 21:57:25 +03:00			`describe "Semantic.CLI" Semantic.CLI.Spec.spec`
			`describe "Semantic.IO" Semantic.IO.Spec.spec`
GitmonClient spec should not run in parallel 2017-03-22 00:48:47 +03:00			`describe "TOC" TOCSpec.spec`
			`describe "Integration" IntegrationSpec.spec`