diff --git a/test/babashka/main_test.clj b/test/babashka/main_test.clj index 10d41ac7..fa58881f 100644 --- a/test/babashka/main_test.clj +++ b/test/babashka/main_test.clj @@ -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