aboutsummaryrefslogtreecommitdiff
path: root/src/cljcc/log.clj
diff options
context:
space:
mode:
authorShagun Agrawal <agrawalshagun07@gmail.com>2024-07-26 00:03:57 +0530
committerShagun Agrawal <agrawalshagun07@gmail.com>2024-07-26 00:03:57 +0530
commitb6de8db464151fa1300c5a47e508e9e792d034d0 (patch)
treefcff2e637d27de228d869f884f9aa33d8cbabbb4 /src/cljcc/log.clj
parent264c71e3a7666bc234a5dd62b1bcc36c89d1949d (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.clj29
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))