Require '#%paramz at the correct phase (thanks ryan)

2010-05-04 17:55:31 -04:00 · 2010-05-04 17:55:31 -04:00 · 087c5129e3
commit 087c5129e3
parent 08ca97bf9e
1 changed files with 1 additions and 0 deletions
--- a/collects/typed-scheme/typecheck/tc-app.rkt
+++ b/collects/typed-scheme/typecheck/tc-app.rkt
@ -18,6 +18,7 @@
         (except-in (env type-environments) extend)
         (rep type-rep filter-rep object-rep)
         (r:infer infer)
+         '#%paramz
         (for-template 
          (only-in '#%kernel [apply k:apply])
          "internal-forms.ss" scheme/base scheme/bool '#%paramz