diff options
| author | Shagun Agrawal <agrawalshagun07@gmail.com> | 2024-07-26 00:03:57 +0530 |
|---|---|---|
| committer | Shagun Agrawal <agrawalshagun07@gmail.com> | 2024-07-26 00:03:57 +0530 |
| commit | b6de8db464151fa1300c5a47e508e9e792d034d0 (patch) | |
| tree | fcff2e637d27de228d869f884f9aa33d8cbabbb4 /src/cljcc/log.clj | |
| parent | 264c71e3a7666bc234a5dd62b1bcc36c89d1949d (diff) | |
Add cli options for pasing and codegen
Add cli options specific for only parsing and codegen
add logger for help in debugging
Diffstat (limited to 'src/cljcc/log.clj')
| -rw-r--r-- | src/cljcc/log.clj | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/src/cljcc/log.clj b/src/cljcc/log.clj new file mode 100644 index 0000000..394e4a4 --- /dev/null +++ b/src/cljcc/log.clj @@ -0,0 +1,29 @@ +(ns cljcc.log + (:require [clojure.string :as str] + [cljcc.log :as log])) + +(def ^:private log-colors + {:debug "\u001b[36m" ; Cyan + :info "\u001b[32m" ; Green + :warn "\u001b[33m" ; Yellow + :error "\u001b[31m" ; Red + :reset "\u001b[0m"}) ; Reset color + +(def reset-color (get log-colors :reset)) + +(defn- log-message [level message] + (let [color (get log-colors level) + formatted-message (str color "[" (str/upper-case (name level)) "] " message reset-color)] + (println formatted-message))) + +(defn debug [msg] + (log-message :debug msg)) + +(defn info [msg] + (log-message :info msg)) + +(defn warn [msg] + (log-message :warn msg)) + +(defn error [msg] + (log-message :error msg)) |
