[Git][ghc/ghc][master] T16012: Be verbose on failure.
Marge Bot
gitlab at gitlab.haskell.org
Thu Jul 2 06:55:00 UTC 2020
Marge Bot pushed to branch master at Glasgow Haskell Compiler / GHC
Commits:
44d6a335 by Andreas Klebinger at 2020-07-02T02:54:54-04:00
T16012: Be verbose on failure.
- - - - -
2 changed files:
- testsuite/tests/ghci/should_run/T16012.script
- testsuite/tests/ghci/should_run/T16012.stdout
Changes:
=====================================
testsuite/tests/ghci/should_run/T16012.script
=====================================
@@ -1,2 +1,6 @@
+-- We expect the allocation counter to be initialized to zero and to count down.
+-- As ghc expressions are executed in their own thread a call to getAllocationCounter
+-- should always return a reasonably low result.
+
n <- System.Mem.getAllocationCounter
-(n < 0 && n >= -160000)
+if (n < 0 && n >= -160000) then putStrLn "Alloction counter in expected range" else (putStrLn $ "Unexpected allocation counter result:" ++ show n)
=====================================
testsuite/tests/ghci/should_run/T16012.stdout
=====================================
@@ -1 +1 @@
-True
+Alloction counter in expected range
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/44d6a3352d708785b75aeb616bfc7efff839184e
--
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/44d6a3352d708785b75aeb616bfc7efff839184e
You're receiving this email because of your account on gitlab.haskell.org.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/ghc-commits/attachments/20200702/668743f9/attachment-0001.html>
More information about the ghc-commits
mailing list