Add the main for the cli module.

src/cipher_analytical_machine/cli/cli.clj

@@ -160,3 +160,10 @@
 
      (show-and-save-output options))))
 
+(defn cli-main
+  [args]
+  (let [{:keys [options arguments action-type exit-message ok?]} (validate-args args)]
+    (if exit-message
+      (exit exit-message ok?)
+      (actions options arguments action-type))))
+

src/cipher_analytical_machine/core.clj

@@ -5,8 +5,5 @@
 
 (defn -main
   [& args]
-  (let [{:keys [options arguments action-type exit-message ok?]} (cli/validate-args args)]
+  (cli/cli-main args))
-    (if exit-message
-      (cli/exit exit-message ok?)
-      (cli/actions options arguments action-type))))