TESTS: use hspec-discover

This commit is contained in:
2016-05-08 23:45:51 +02:00
parent 5b6a342a9e
commit c89d6b945c
19 changed files with 87 additions and 114 deletions

View File

@@ -19,8 +19,8 @@ import Utils
copyDirRecursiveOverwriteSpec :: Spec
copyDirRecursiveOverwriteSpec =
spec :: Spec
spec =
describe "HSFM.FileSystem.FileOperations.copyDirRecursiveOverwrite" $ do
-- successes --

View File

@@ -19,8 +19,8 @@ import Utils
copyDirRecursiveSpec :: Spec
copyDirRecursiveSpec =
spec :: Spec
spec =
describe "HSFM.FileSystem.FileOperations.copyDirRecursive" $ do
-- successes --

View File

@@ -19,8 +19,8 @@ import Utils
copyFileOverwriteSpec :: Spec
copyFileOverwriteSpec =
spec :: Spec
spec =
describe "HSFM.FileSystem.FileOperations.copyFileOverwrite" $ do
-- successes --

View File

@@ -19,8 +19,8 @@ import Utils
copyFileSpec :: Spec
copyFileSpec =
spec :: Spec
spec =
describe "HSFM.FileSystem.FileOperations.copyFile" $ do
-- successes --

View File

@@ -15,8 +15,8 @@ import GHC.IO.Exception
import Utils
createDirSpec :: Spec
createDirSpec =
spec :: Spec
spec =
describe "HSFM.FileSystem.FileOperations.createDir" $ do
-- successes --

View File

@@ -15,8 +15,8 @@ import GHC.IO.Exception
import Utils
createRegularFileSpec :: Spec
createRegularFileSpec =
spec :: Spec
spec =
describe "HSFM.FileSystem.FileOperations.createRegularFile" $ do
-- successes --

View File

@@ -20,8 +20,8 @@ import Utils
deleteDirRecursiveSpec :: Spec
deleteDirRecursiveSpec =
spec :: Spec
spec =
describe "HSFM.FileSystem.FileOperations.deleteDirRecursive" $ do
-- successes --

View File

@@ -19,8 +19,8 @@ import GHC.IO.Exception
import Utils
deleteDirSpec :: Spec
deleteDirSpec =
spec :: Spec
spec =
describe "HSFM.FileSystem.FileOperations.deleteDir" $ do
-- successes --

View File

@@ -19,8 +19,8 @@ import GHC.IO.Exception
import Utils
deleteFileSpec :: Spec
deleteFileSpec =
spec :: Spec
spec =
describe "HSFM.FileSystem.FileOperations.deleteFile" $ do
-- successes --

View File

@@ -29,8 +29,8 @@ import Utils
getDirsFilesSpec :: Spec
getDirsFilesSpec =
spec :: Spec
spec =
describe "HSFM.FileSystem.FileOperations.getDirsFiles" $ do
-- successes --

View File

@@ -17,8 +17,8 @@ import Utils
getFileTypeSpec :: Spec
getFileTypeSpec =
spec :: Spec
spec =
describe "HSFM.FileSystem.FileOperations.getFileType" $ do
-- successes --

View File

@@ -16,8 +16,8 @@ import GHC.IO.Exception
import Utils
moveFileOverwriteSpec :: Spec
moveFileOverwriteSpec =
spec :: Spec
spec =
describe "HSFM.FileSystem.FileOperations.moveFileOverwrite" $ do
-- successes --

View File

@@ -16,8 +16,8 @@ import GHC.IO.Exception
import Utils
moveFileSpec :: Spec
moveFileSpec =
spec :: Spec
spec =
describe "HSFM.FileSystem.FileOperations.moveFile" $ do
-- successes --

View File

@@ -16,8 +16,8 @@ import GHC.IO.Exception
import Utils
recreateSymlinkSpec :: Spec
recreateSymlinkSpec =
spec :: Spec
spec =
describe "HSFM.FileSystem.FileOperations.recreateSymlink" $ do
-- successes --

View File

@@ -16,8 +16,8 @@ import GHC.IO.Exception
import Utils
renameFileSpec :: Spec
renameFileSpec =
spec :: Spec
spec =
describe "HSFM.FileSystem.FileOperations.renameFile" $ do
-- successes --