From a95ce7dc5a6061590489f956f5e5e61171aa12a7 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Mon, 15 Aug 2011 06:45:42 -0600 Subject: [PATCH] remove debugging output --- collects/racket/private/kw.rkt | 1 - 1 file changed, 1 deletion(-) diff --git a/collects/racket/private/kw.rkt b/collects/racket/private/kw.rkt index 51e7937b08..8622367a8c 100644 --- a/collects/racket/private/kw.rkt +++ b/collects/racket/private/kw.rkt @@ -985,7 +985,6 @@ (when (or (n . < . n-req) (and (not rest?) (n . > . (+ n-req n-opt)))) - (printf "~s\n" (list n n-req n-opt)) (warning "wrong number of by-position arguments"))) (lambda (args kw-args lifted? orig) (let* ([args (syntax->list (datum->syntax #f args))]