fix test suite typo

svn: r15034
2009-06-01 12:19:51 +00:00 · 2009-06-01 12:19:51 +00:00 · 122fd73ce8
commit 122fd73ce8
parent 31597a0c43
1 changed files with 1 additions and 1 deletions
--- a/collects/tests/mzscheme/file.ss
+++ b/collects/tests/mzscheme/file.ss
@ -952,7 +952,7 @@
 			 (semaphore-post lock))
 			(wrap-evt
 			 (semaphore-peek-evt lock)
-			 (lambda () 0)))))
+			 (lambda (v) 0)))))
 	     void)])
    (test-a-port p (gdelay go) gsync)))