* Makefile.am (ice9_sources): Added "time.scm".

[bpt/guile.git] / ice-9 / safe.scm

diff --git a/ice-9/safe.scm b/ice-9/safe.scm
index fe6da1a..bd4fc37 100644 (file)
--- a/ice-9/safe.scm
+++ b/ice-9/safe.scm
@@ -29,3 +29,6 @@
                 (list n)
                 '()))
   safe-r5rs-interface)
+
+(define-public (make-safe-module)
+  (make-module 1021 (list safe-r5rs-interface)))