From 10cc76f22bce886b3693340cd6fb4916a327ebcc Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Sat, 31 May 2014 01:58:01 -0500 Subject: [PATCH] remove stupid printfs --- .../drracket-pkgs/drracket/drracket/private/expanding-place.rkt | 2 -- 1 file changed, 2 deletions(-) diff --git a/pkgs/drracket-pkgs/drracket/drracket/private/expanding-place.rkt b/pkgs/drracket-pkgs/drracket/drracket/private/expanding-place.rkt index a3cd3bfef3..37ada93f03 100644 --- a/pkgs/drracket-pkgs/drracket/drracket/private/expanding-place.rkt +++ b/pkgs/drracket-pkgs/drracket/drracket/private/expanding-place.rkt @@ -340,9 +340,7 @@ (exn-continuation-marks an-exn))) (define info (for/or ([mark-pr (in-list marks)]) - (printf "considering ~s\n" mark-pr) (srcloc->srcinfo (cdr mark-pr)))) - (printf "info ~s\n" info) (cond [info (list info)] [else '()])]