Add a simple cli interface.
This commit is contained in:
@@ -1,7 +1,12 @@
|
||||
(ns cipher-analytical-machine.core
|
||||
(:require
|
||||
[cipher-analytical-machine.cli :as cli])
|
||||
(:gen-class))
|
||||
|
||||
(defn -main
|
||||
"I don't do a whole lot ... yet."
|
||||
[& args]
|
||||
(println "Hello, World!"))
|
||||
(let [{:keys [options arguments exit-message ok?]} (cli/validate-args args)]
|
||||
(if exit-message
|
||||
(cli/exit exit-message ok?)
|
||||
(cli/actions options arguments))))
|
||||
|
||||
|
||||
Reference in New Issue
Block a user