[#345] test for .deleteOnExit

This commit is contained in:
Michiel Borkent 2020-04-11 21:10:21 +02:00
parent 4109aa5264
commit 56a798135c

View file

@ -395,6 +395,13 @@
(.unread pb (.read pb))
(slurp pb))"))))
(deftest delete-on-exit-test
(when test-utils/native?
(let [f (java.io.File/createTempFile "foo" "bar")
p (.getPath f)]
(bb nil (format "(.deleteOnExit (io/file \"%s\"))" p))
(is (false? (.exists f))))))
;;;; Scratch
(comment