summaryrefslogtreecommitdiff
path: root/libguile/modules.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/modules.c')
-rw-r--r--libguile/modules.c5
1 files changed, 5 insertions, 0 deletions
diff --git a/libguile/modules.c b/libguile/modules.c
index f0bdcc51e..93e3064d7 100644
--- a/libguile/modules.c
+++ b/libguile/modules.c
@@ -91,6 +91,11 @@ scm_c_call_with_current_module (SCM module,
return scm_c_with_fluid (the_module, module, func, data);
}
+void
+scm_frame_current_module (SCM module)
+{
+ scm_frame_fluid (the_module, module);
+}
/*
convert "A B C" to scheme list (A B C)