diff options
| author | Daniel Gröber <dxld@darkboxed.org> | 2019-01-30 20:59:12 +0100 |
|---|---|---|
| committer | Daniel Gröber <dxld@darkboxed.org> | 2019-01-30 20:59:12 +0100 |
| commit | bf9e458fd74a9d187be6929c212e46b341b05c8c (patch) | |
| tree | 2f6d84dcf750603cd51cea2660036d54da17caab /tests/CompileTest.hs | |
| parent | 74704110ca0eb6760a6e133ac88133a590d4ef8f (diff) | |
Add log-level to verbosity conditional
Diffstat (limited to 'tests/CompileTest.hs')
| -rw-r--r-- | tests/CompileTest.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/CompileTest.hs b/tests/CompileTest.hs index bae5ad0..4ad5804 100644 --- a/tests/CompileTest.hs +++ b/tests/CompileTest.hs @@ -58,7 +58,7 @@ main = do let ?progs = defaultPrograms let ?cprogs = defaultCompPrograms let ?opts = defaultCompileOptions { oVerbose = True } - let ?verbose = True + let ?verbose = \level -> case level of 1 -> True; _ -> False args <- getArgs case args of |