Skip to content

fix spelling errors #61

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
merged 1 commit into from
Apr 12, 2022
Merged

fix spelling errors #61

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
1 commit
Select commit
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion core/src/Test/Framework/Runners/Console.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -151,7 +151,7 @@ defaultMainWithOpts tests ropts = do
K (Just file) -> XML.produceReport (unK (ropt_xml_nested ropts')) test_statistics' fin_tests >>= writeFile file
_ -> return ()

-- Set the error code depending on whether the tests succeded or not
-- Set the error code depending on whether the tests succeeded or not
exitWith $ if ts_no_failures test_statistics'
then ExitSuccess
else ExitFailure 1
Expand Down
2 changes: 1 addition & 1 deletion core/src/Test/Framework/Runners/Console/Run.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -39,7 +39,7 @@ showRunTestsTop isplain hide_successes running_tests = (if isplain then id else
return finished_tests


-- This code all /really/ sucks. There must be a better way to seperate out the console-updating
-- This code all /really/ sucks. There must be a better way to separate out the console-updating
-- and the improvement-traversing concerns - but how?
showRunTest :: Bool -> Bool -> Int -> TestStatistics -> RunningTest -> IO (TestStatistics, FinishedTest)
showRunTest isplain hide_successes indent_level test_statistics (RunTest name test_type (SomeImproving improving_result)) = do
Expand Down