Rosetta Code

Check that file exists: Difference between revisions

Page Discussion

Check that file exists (view source)

Revision as of 10:40, 30 November 2013

328 bytes removed ,  10 years ago
→‎{{header|Clojure}}
(added Julia example)
Line 369:
 
=={{header|Clojure}}==
<lang clojure>(import '(java.io File))
 
(.exists (clojure.java.io/as-file "myfile.txt"))
(defn kind [filename]
(let [f (File. filename)]
(cond
(.isFile f) "file"
(.isDirectory f) "directory"
(.exists f) "other"
:else "(non-existent)" )))
 
</lang>
(defn look-for [filename]
(println filename ":" (kind filename)))
 
(look-for "input.txt")
(look-for "/input.txt")
(look-for "docs")
(look-for "/docs")</lang>
 
=={{header|Common Lisp}}==
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/29220"