From cca2376b9b57334cf40cc9b3dfac5e3478903528 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Tue, 19 Apr 2016 22:59:28 -0700 Subject: [PATCH] de-angling --- beautiful-racket-lib/br/define.rkt | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/beautiful-racket-lib/br/define.rkt b/beautiful-racket-lib/br/define.rkt index 1e283f9..3a06813 100644 --- a/beautiful-racket-lib/br/define.rkt +++ b/beautiful-racket-lib/br/define.rkt @@ -20,11 +20,11 @@ (require rackunit racket/port) (parameterize ([current-output-port (open-output-nowhere)]) (check-equal? (let () - (br:debug-define #'(foo ) - #'(apply + (list ))) + (br:debug-define #'(foo X Y Z) + #'(apply + (list X Y Z))) (foo 1 2 3)) 6) (check-equal? (let () - (br:debug-define #'(foo ...) #'(apply * (list ...))) + (br:debug-define #'(foo X ...) #'(apply * (list X ...))) (foo 10 11 12)) 1320)))