Simplify fix for PR 14030

Please merge into 6.0
2013-11-20 18:38:39 -05:00 · 2013-11-20 18:38:39 -05:00 · 6a787c963f
commit 6a787c963f
parent f292a9c0f2
1 changed files with 12 additions and 12 deletions
--- a/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/base-env/prims.rkt
+++ b/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/base-env/prims.rkt
@ -262,7 +262,7 @@ This file defines two sorts of primitives. All of them are provided into any mod
         (if (Error? typ)
             ;; This code should never get run, typechecking will have an error earlier
             #`(error 'make-predicate "Couldn't parse type")
-             #`(let ()
+             #`(#%expression
                (ann
                 #,(ignore-some-property
                    (type->contract