mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2026-08-28 21:28:51 +00:00
Code Issues 1 Releases Wiki Activity

Reformat and use new os/stat capabilities.

Browse Source
This commit is contained in:
Calvin Rose
2019-04-01 11:21:45 -04:00
parent b15cf193a0
commit cd6c009c03
2 changed files with 52 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files
tools/cook.janet
+3 -3
View File
@@ -20,7 +20,7 @@
(defn- rm
"Remove a directory and all sub directories."
[path]
(if (= ((os/stat path) :mode) :directory)
(if (= (os/stat path :mode) :directory)
(do
(each subpath (os/dir path) (rm subpath))
(os/rmdir path))
@@ -32,8 +32,8 @@
(def f (file/open dest))
(if (not f) (break true))
(file/close f)
(let [mod-dest ((os/stat dest) :modified)
mod-src ((os/stat src) :modified)]
(let [mod-dest (os/stat dest :modified)
mod-src (os/stat src :modified)]
(< mod-dest mod-src)))
(defn- needs-build-some