diff options
| author | Tom Smeding <tom@tomsmeding.com> | 2022-06-06 11:19:16 +0200 |
|---|---|---|
| committer | Tom Smeding <tom@tomsmeding.com> | 2022-06-06 11:19:16 +0200 |
| commit | 1e8c48386412ea5c75cbb0859df1cb895ee4c732 (patch) | |
| tree | a20a4e0017ecfbadcbe28d2b83c122a964bd3b0c /test | |
| parent | f152fbbe4d9710ecb5e8c39c27e36319de000548 (diff) | |
Debug printsdebug
Diffstat (limited to 'test')
| -rw-r--r-- | test/Main.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/test/Main.hs b/test/Main.hs index 90e5f90..8a0a81a 100644 --- a/test/Main.hs +++ b/test/Main.hs @@ -34,6 +34,7 @@ main = do gclog <- getGCLog when (length gclog == 0) $ fail "GC log was unexpectedly empty" + print gclog when (any ((< enabletm) . detTimestamp) gclog) $ do _ <- fail "Logging was already on before enableGClogging" print enabletm |