diff --git a/test-suite/tests/load.test b/test-suite/tests/load.test
index 1cf8d65..a43573c 100644
--- a/test-suite/tests/load.test
+++ b/test-suite/tests/load.test
@@ -20,7 +20,8 @@
 (define-module (test-suite test-load)
   #:use-module (test-suite lib)
   #:use-module (test-suite guile-test)
-  #:use-module (system base compile))
+  #:use-module (system base compile)
+  #:use-module (ice-9 ftw))
 
 (define temp-dir (data-file-name "load-test.dir"))
 
@@ -61,6 +62,7 @@
 	      (delete-tree name)
 	      (loop))))))
       (closedir dir)
+      (pk 'remaining tree (scandir tree))
       (rmdir tree)))
    ((file-exists? tree)
     (delete-file tree))