github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-11-28 10:15:55 +03:00
Code Issues Projects Releases Wiki Activity

Rename for better consistency

Browse Source
This commit is contained in:
Rick Winfrey 2016-10-27 20:51:23 -05:00
parent cb28917573
commit b2709315c5
1 changed files with 8 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
test/SemanticGitDiffSpec.hs
View File

@ -40,14 +40,16 @@ runTestsIn filePaths format matcher = do
spec :: Spec
spec = parallel $ do
diffSummaryFiles <- runIO $ testCaseFiles "test/corpus/diff-summaries"
diffSummaryToDoFiles <- runIO $ testCaseFiles "test/corpus/diff-summaries-todo"
diffSummaryCrasherFiles <- runIO $ testCaseFiles "test/corpus/diff-summary-crashers"
summaryFormatFiles <- runIO $ testCaseFiles "test/corpus/diff-summaries"
summaryFormatToDoFiles <- runIO $ testCaseFiles "test/corpus/diff-summaries-todo"
summaryFormatCrasherFiles <- runIO $ testCaseFiles "test/corpus/diff-summary-crashers"
describe "diff summaries" $ runTestsIn diffSummaryFiles Summary shouldBe
describe "diff summaries todo" $ runTestsIn diffSummaryToDoFiles Summary shouldNotBe
describe "diff summaries crashers todo" $ runTestsIn diffSummaryCrasherFiles Summary shouldBe
jsonFormatFiles <- runIO $ testCaseFiles "test/corpus/json"
describe "Summary format" $ runTestsIn summaryFormatFiles Summary shouldBe
describe "Summary format todo" $ runTestsIn summaryFormatToDoFiles Summary shouldNotBe
describe "Summary format crashers todo" $ runTestsIn summaryFormatCrasherFiles Summary shouldBe
describe "JSON format" $ runTestsIn jsonFormatFiles JSON shouldBe
where testCaseFiles :: String -> IO [FilePath]