src/ExitCodes.hs

   1 -- | Some exit codes, used in the ExitFailure constructor.
   2 module ExitCodes (
   3   exit_args_parse_failed,
   4   exit_invalid_cidr
   5   )
   6 where
   7
   8 -- | One of the CIDRs is invalid (malformed, not a CIDR at all, etc).
   9 exit_invalid_cidr :: Int
  10 exit_invalid_cidr = 1
  11
  12 -- | We were unable to parse the command-line arguments.
  13 exit_args_parse_failed :: Int
  14 exit_args_parse_failed = 2