~ chicken-core (chicken-5) d420a814d65ee45c73db2fb1721ad0ac840f5c54

commit d420a814d65ee45c73db2fb1721ad0ac840f5c54
Author:     Peter Bex <peter@more-magic.net>
AuthorDate: Sat Oct 17 16:20:54 2015 +0200
Commit:     Peter Bex <peter@more-magic.net>
CommitDate: Sat Oct 17 16:35:51 2015 +0200

    Close file in test, otherwise we can't delete it in Windows

diff --git a/tests/posix-tests.scm b/tests/posix-tests.scm
index 413a1617..8acfcfe3 100644
--- a/tests/posix-tests.scm
+++ b/tests/posix-tests.scm
@@ -53,6 +53,7 @@
       (move-memory! (memory-mapped-file-pointer mmap) str size)
       (assert (blob=? (string->blob data) (string->blob str)))
       (unmap-file-from-memory mmap)
+      (file-close tmpfilno)
       (delete-file* tnpfilpn))))
 
 (let* ((tmp-dir (create-temporary-directory))