Remove unnecessary use of parallel.

Author: Patrick Thomson

test/Analysis/Go/Spec.hs

@@ -8,7 +8,7 @@ import           SpecHelpers
 
 
 spec :: (?session :: TaskSession) => Spec
-spec = parallel $ do
+spec = do
   describe "Go" $ do
     it "imports and wildcard imports" $ do
       (scopeGraph, (heap, res)) <- evaluate ["main.go", "foo/foo.go", "bar/bar.go", "bar/rab.go"]

test/Analysis/PHP/Spec.hs

@@ -9,7 +9,7 @@ import           SpecHelpers
 
 
 spec :: (?session :: TaskSession) => Spec
-spec = parallel $ do
+spec = do
   describe "PHP" $ do
     xit "evaluates include and require" $ do
       (scopeGraph, (heap, res)) <- evaluate ["main.php", "foo.php", "bar.php"]

test/Analysis/Python/Spec.hs

@@ -10,7 +10,7 @@ import SpecHelpers
 
 
 spec :: (?session :: TaskSession) => Spec
-spec = parallel $ do
+spec = do
   describe "Python" $ do
     it "imports" $ do
       (scopeGraph, (heap, res)) <- evaluate ["main.py", "a.py", "b/__init__.py", "b/c.py"]

test/Analysis/Ruby/Spec.hs

@@ -15,7 +15,7 @@ import SpecHelpers
 
 
 spec :: (?session :: TaskSession) =>  Spec
-spec = parallel $ do
+spec = do
   describe "Ruby" $ do
     it "evaluates require_relative" $ do
       (scopeGraph, (heap, res)) <- evaluate ["main.rb", "foo.rb"]

test/Analysis/TypeScript/Spec.hs

@@ -23,7 +23,7 @@ import qualified Language.TypeScript.Assignment as TypeScript
 import           SpecHelpers
 
 spec :: (?session :: TaskSession) => Spec
-spec = parallel $ do
+spec = do
   describe "TypeScript" $ do
     it "qualified export from" $ do
       (scopeGraph, (heap, res)) <- evaluate ["main6.ts", "baz.ts", "foo.ts"]

test/Control/Abstract/Evaluator/Spec.hs

@@ -21,7 +21,7 @@ import           SpecHelpers hiding (reassociate)
 import           System.IO.Unsafe (unsafePerformIO)
 
 spec :: Spec
-spec = parallel $ do
+spec = do
   it "constructs integers" $ do
     (_, (_, (_, expected))) <- evaluate (integer 123)
     expected `shouldBe` Right (Value.Integer (Number.Integer 123))

test/Data/Diff/Spec.hs

@@ -7,6 +7,6 @@ import Test.Hspec
 import Test.Hspec.LeanCheck
 
 spec :: Spec
-spec = parallel $ do
+spec = do
   prop "equality is reflexive" $
     \ diff -> diff `shouldBe` (diff :: Diff ListableSyntax () ())

test/Data/Functor/Classes/Generic/Spec.hs

@@ -7,7 +7,7 @@ import Test.Hspec
 import Test.Hspec.LeanCheck
 
 spec :: Spec
-spec = parallel $ do
+spec = do
   describe "Eq1" $ do
     describe "genericLiftEq" $ do
       prop "equivalent to derived (==) for product types" $

test/Data/Source/Spec.hs

@@ -70,7 +70,7 @@ testTree = Tasty.testGroup "Data.Source"
   ]
 
 spec :: Spec
-spec = parallel $ do
+spec = do
   describe "newlineIndices" $ do
     it "finds \\n" $
       let source = "a\nb" in

test/Data/Term/Spec.hs

@@ -8,7 +8,7 @@ import Test.Hspec.Expectations
 import Test.Hspec.LeanCheck
 
 spec :: Spec
-spec = parallel $ do
+spec = do
   describe "Term" $ do
     prop "equality is reflexive" $
       \ a -> a `shouldBe` (a :: Term ListableSyntax ())