diff --git a/racket/collects/racket/private/more-scheme.rkt b/racket/collects/racket/private/more-scheme.rkt
index 486cf753c2..17198076f3 100644
--- a/racket/collects/racket/private/more-scheme.rkt
+++ b/racket/collects/racket/private/more-scheme.rkt
@@ -258,8 +258,9 @@
                                      #'select-handler/breaks-as-is)
                                e bpz
                                (list (cons pred-name handler-name) ...)))
-                            (lambda ()
-                              expr1 expr ...)))))))])))])
+                            #,(syntax/loc stx
+                                (lambda ()
+                                  expr1 expr ...))))))))])))])
       (values (wh #t) (wh #f))))
 
   (define (call-with-exception-handler exnh thunk)