Add driver changes and float regex

1 files changed, 6 insertions, 2 deletions

diff --git a/src/cljcc/cljcc.clj b/src/cljcc/cljcc.clj
index e36658e..c03301d 100644
--- a/src/cljcc/cljcc.clj
+++ b/src/cljcc/cljcc.clj
@@ -37,11 +37,15 @@
 (defn -main
   "Main entrypoint for cljcc compiler."
   [& args]
-  (let [{:keys [file-path exit-message ok? options]} (validate-args args)]
+  (let [{:keys [file-path exit-message ok? options]} (validate-args args)
+        libs (filterv (fn [v] (and
+                               (string? v)
+                               (re-matches #"-l.+" v)))
+                      args)]
     (if exit-message
       (exit (if ok? 0 1) exit-message)
       (try
-        (d/run file-path options)
+        (d/run file-path (assoc options :libs libs))
         (exit 0 "Successfully executed.")
         (catch Exception e
           (exit 1 (ex-message e) e))))))