6 lines
161 B
Clojure
6 lines
161 B
Clojure
|
(defn truncate [file size]
|
||
|
|
(with-open [chan (.getChannel (java.io.FileOutputStream. file true))]
|
||
|
|
(.truncate chan size)))
|
||
|
|
|
||
|
|
(truncate "truncate_test.txt" 2)
|