X-Git-Url: http://gitweb.michael.orlitzky.com/?p=dead%2Flwn-epub.git;a=blobdiff_plain;f=src%2FExitCodes.hs;fp=src%2FExitCodes.hs;h=11c03f9b67a7e53cff4bfbd2a71a1e7df4971512;hp=0000000000000000000000000000000000000000;hb=ed2ed8abd62ba3dec7f799253de1133732f8c153;hpb=6103dbc5f8d3689e32001c3fd7627f3153e40bb0

diff --git a/src/ExitCodes.hs b/src/ExitCodes.hs
new file mode 100644
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