Define constants for exit codes based on sysexits.h

1 files changed, 20 insertions, 0 deletions

diff --git a/src/package.lisp b/src/package.lisp
new file mode 100644
index 0000000..73011ec
--- /dev/null
+++ b/src/package.lisp
@@ -0,0 +1,20 @@
+(defpackage :sysexits
+  (:use :cl)
+
+  (:export
+    #:+ok+
+    #:+usage+
+    #:+dataerr+
+    #:+noinput+
+    #:+nouser+
+    #:+nohost+
+    #:+unavailable+
+    #:+software+
+    #:+oserr+
+    #:+osfile+
+    #:+cantcreat+
+    #:+ioerr+
+    #:+tempfail+
+    #:+protocol+
+    #:+noperm+
+    #:+config+))