Avoid providing renamed identifiers.

original commit: 00f9e6342f481dae77e8161f1a71ecc0e39a55b4
2011-06-21 15:17:40 -04:00 · 2011-06-21 15:17:40 -04:00 · 37672bf915
commit 37672bf915
parent 114e2d3866
1 changed files with 1 additions and 1 deletions
--- a/collects/typed-scheme/minimal.rkt
+++ b/collects/typed-scheme/minimal.rkt
@ -24,5 +24,5 @@
             (require (only-in spec id ...) ...)
             (provide id ...) ...
             (provide (rename-out [b* b] ...))
-             (provide (all-from-out ts))
+             (provide (except-out (all-from-out ts) b* ...))
             (provide (all-from-out lb) ...))))))]))