removed printf

svn: r5915

original commit: 7ef0ce8b0fc466ca3f2ba64363d6b46407c3076b
This commit is contained in:
Robby Findler 2007-04-10 18:18:24 +00:00
parent 069cc97601
commit f3284f1539

View File

@ -228,9 +228,7 @@ the state transitions / contracts are:
(begin
(v p value)
(cons callback (loop (cdr callbacks))))
(begin
(printf "lost a ~s callback\n" p)
(loop (cdr callbacks)))))]
(loop (cdr callbacks))))]
[else
(cb p value)
(cons callback (loop (cdr callbacks)))]))]))])