From af41ab40e1fc4888d1873a9ffe681ddafdfb4ee0 Mon Sep 17 00:00:00 2001
From: Avi Dessauer <avi.the.coder@gmail.com>
Date: Wed, 21 Aug 2019 06:03:31 -0400
Subject: Delete trailing whitespace (#42)

---
 test/Main.hs | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

(limited to 'test/Main.hs')

diff --git a/test/Main.hs b/test/Main.hs
index bfe34cd..d080135 100644
--- a/test/Main.hs
+++ b/test/Main.hs
@@ -106,7 +106,7 @@ packageInfoSpec currentDir = do
         Just modInfo -> moduleInfoSpec modInfo
         Nothing -> return ()
     Left e -> runIO $ putStrLn e >> return ()
-  
+
 moduleInfoSpec :: ModuleInfo -> Spec
 moduleInfoSpec modInfo =
   describe "createModuleInfo" $ do
@@ -136,7 +136,7 @@ moduleInfoSpec modInfo =
       HCE.source (modInfo :: HCE.ModuleInfo) `shouldBe` sourceCodeLines
     it "returns valid map of expressions" $
       HCE.exprInfoMap (modInfo :: HCE.ModuleInfo) `shouldBe` testExprInfoMap
-#if MIN_VERSION_GLASGOW_HASKELL(8,2,2,0)      
+#if MIN_VERSION_GLASGOW_HASKELL(8,2,2,0)
     it "returns valid map of identifiers " $
       let removeLocationInfo :: HCE.LocationInfo -> HCE.LocationInfo
           removeLocationInfo _ = HCE.UnknownLocation ""
@@ -148,9 +148,9 @@ moduleInfoSpec modInfo =
             _ ->  extId
           cleanup :: HCE.IdentifierInfoMap -> HCE.IdentifierInfoMap
           cleanup = U.transformBi removeLocationInfo . U.transformBi removePackageVersionFromExternalId
-       in 
+       in
         cleanup (HCE.idInfoMap (modInfo :: HCE.ModuleInfo)) `shouldBe` cleanup testIdInfoMap
-#endif          
+#endif
     it "returns valid map of identifier occurrences" $
       HCE.idOccMap (modInfo :: HCE.ModuleInfo) `shouldBe` testIdOccMap
 
@@ -208,7 +208,7 @@ buildAndIndexTestPackage currentDir = do
     Nothing ->
       return . Left $
       "Cannot find stack executable. Stack executable is required to build the test package."
-    
+
 sourceCodeTransformationSpec :: FilePath -> Spec
 sourceCodeTransformationSpec currentDir = do
   sourceCodeAfterPreprocessor <-
@@ -258,12 +258,12 @@ sourceCodeTransformationSpec currentDir = do
        in fileIndex sourceCodeTransformation `shouldBe` index
   describe "fromOriginalLineNumber" $ do
     test fromOriginalLineNumber sourceCodeTransformation (HaskellFilePath "File.hs", 1) (Right 1)
-    test fromOriginalLineNumber sourceCodeTransformation (HaskellFilePath "File.hs", 4) (Right 4)    
+    test fromOriginalLineNumber sourceCodeTransformation (HaskellFilePath "File.hs", 4) (Right 4)
     test fromOriginalLineNumber sourceCodeTransformation (HaskellFilePath "File1.hs", 1) (Right 9)
     test fromOriginalLineNumber sourceCodeTransformation (HaskellFilePath "File1.hs", 2) (Right 10)
     test fromOriginalLineNumber sourceCodeTransformation (HaskellFilePath "File2.hs", 1) (Right 13)
     test fromOriginalLineNumber sourceCodeTransformation (HaskellFilePath "File2.hs", 3) (Right 15)
-    test fromOriginalLineNumber sourceCodeTransformation (HaskellFilePath "File2.hs", 5) (Right 17)    
+    test fromOriginalLineNumber sourceCodeTransformation (HaskellFilePath "File2.hs", 5) (Right 17)
     test fromOriginalLineNumber sourceCodeTransformation (HaskellFilePath "File1.hs", 15) (Right 19)
     test fromOriginalLineNumber sourceCodeTransformation (HaskellFilePath "File1.hs", 16) (Right 20)
     test fromOriginalLineNumber sourceCodeTransformation (HaskellFilePath "File3.hs", 1) (Right 27)
@@ -663,7 +663,7 @@ testIdOccMap =
               })
         ])
     ]
-  
+
 testIdInfoMap :: HM.HashMap InternalId IdentifierInfo
 testIdInfoMap =
   HM.fromList
-- 
cgit v1.2.3