Use cmdargs to parse the one command-line argument.

[dead/lwn-epub.git] / src / ExitCodes.hs

diff --git a/src/ExitCodes.hs b/src/ExitCodes.hs
new file mode 100644 (file)
index 0000000..11c03f9
--- /dev/null
+++ b/src/ExitCodes.hs
@@ -0,0 +1,9 @@
+-- |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