racket/contract: fix blame in arre case

Remove an incorrect syntax quote that could cause the contract
system to be blamed (and also lead to an absolute path in
bytecode).

racket/collects/racket/contract/private/provide.rkt

@@ -244,7 +244,7 @@
           (if (and user-rename-id
                    (syntax-source user-rename-id))
               user-rename-id
-              #'ex-id)))
+              ex-id)))
     (with-syntax ([code
                    (syntax-property
                     (quasisyntax/loc stx