diff --git a/collects/mzlib/foreign.ss b/collects/mzlib/foreign.ss
index a1be1d3..d7e56c8 100644
--- a/collects/mzlib/foreign.ss
+++ b/collects/mzlib/foreign.ss
@@ -45,7 +45,7 @@
                         [(id   ...) (generate-temporaries unsafe-bindings)])
             (set! unsafe-bindings '())
             #'(begin
-                (provide unsafe)
+                (provide (protect unsafe))
                 (define-syntax (unsafe stx)
                   (syntax-case stx ()
                     [(_) (with-syntax ([(id ...) (list (datum->syntax-object