diff --git a/racket/collects/racket/private/kw.rkt b/racket/collects/racket/private/kw.rkt
index ef3a2f9ebc..486bbe1bb9 100644
--- a/racket/collects/racket/private/kw.rkt
+++ b/racket/collects/racket/private/kw.rkt
@@ -636,7 +636,7 @@
                        (let ([#,core-id #,impl])
                          (let ([#,unpack-id #,kwimpl])
                            #,wrap))))))
-                 #`(#%expression #,stx)))])
+                 (quasisyntax/loc stx (#%expression #,stx))))])
       (values new-lambda new-lambda)))
   
   (define (missing-kw proc . args)