-- | All exit codes that the program can return (excepting
--   ExitSuccess). There's only one, since the program will try and
--   fail forever upon errors.
module ExitCodes
where

-- | Indicates that the command-line arguments could not be parsed.
exit_args_parse_failed :: Int
exit_args_parse_failed = 1

-- | Indicates that the input file given on the command-line does not
--   exist.
exit_input_file_doesnt_exist :: Int
exit_input_file_doesnt_exist = 2