Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
6
Task/Empty-directory/Clojure/empty-directory.clj
Normal file
6
Task/Empty-directory/Clojure/empty-directory.clj
Normal file
|
|
@ -0,0 +1,6 @@
|
|||
(require '[clojure.java.io :as io])
|
||||
(defn empty-dir? [path]
|
||||
(let [file (io/file path)]
|
||||
(assert (.exists file))
|
||||
(assert (.isDirectory file))
|
||||
(-> file .list empty?))) ; .list ignores "." and ".."
|
||||
Loading…
Add table
Add a link
Reference in a new issue