yogsototh/leiningen
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Implement compile command.

Browse source
This commit is contained in:
Phil Hagelberg 2009-11-02 21:22:57 -08:00
parent d678f25aef
commit f8d6035dd8
1 changed files with 10 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
src/leiningen/compile.clj
View file

@ -1,7 +1,13 @@
(ns leiningen.compile
(:use [clojure.contrib.java-utils :only [file]]
[clojure.contrib.find-namespaces :only [find-namespaces-in-dir]])
(:refer-clojure :exclude [compile]))
;; accept either a list of namespaces or spider the project root for .clj files
;; create classes/ directory
(defn compile [project])
(defn compile
"Compile the namespaces specified in build.clj or all namespaces in src/
if none are provided."
[project]
(.mkdir (file (:root project) "classes"))
(doseq [n (or (:namespaces project)
(find-namespaces-in-dir (file (:root project) "src")))]
(compile n)))