diff --git a/collects/tests/framework/main.ss b/collects/tests/framework/main.ss
index f1aad524..30024658 100644
--- a/collects/tests/framework/main.ss
+++ b/collects/tests/framework/main.ss
@@ -227,6 +227,7 @@
 		 ("Only run test named <test-name>" "test-name")]))])
 	(parse-command-line "framework-test" argv command-line-flags
 			    (lambda files
+			      (printf "processing ~a~n" files)
 			      (set! files-to-process (if (null? files) all-files files)))
 			    `("Names of the tests; defaults to all tests"))