diff options
Diffstat (limited to 'Coolbal/Verbosity.hs')
| -rw-r--r-- | Coolbal/Verbosity.hs | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/Coolbal/Verbosity.hs b/Coolbal/Verbosity.hs new file mode 100644 index 0000000..e9b6cac --- /dev/null +++ b/Coolbal/Verbosity.hs @@ -0,0 +1,9 @@ +module Coolbal.Verbosity where + + +data Verbosity = Quiet | Verbose + deriving (Show, Eq, Ord) + +intToVerbosity :: Int -> Verbosity +intToVerbosity n | n <= 0 = Quiet +intToVerbosity _ = Verbose |