summaryrefslogtreecommitdiff
path: root/libguile/deprecated.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2009-12-05 11:30:09 +0100
committerAndy Wingo <wingo@pobox.com>2009-12-05 11:32:50 +0100
commitf39448c5a3804f823e367d97cd5e862b016cb8aa (patch)
tree6994d6aef8e6a1d24eb066e98b3a7b58ba903df2 /libguile/deprecated.c
parent1be8532fdb7715451b939571f9a147635df9cd65 (diff)
downloadguile-f39448c5a3804f823e367d97cd5e862b016cb8aa.tar.gz
remove a bunch of needless scm_permanent_object calls
* libguile/array-handle.c: * libguile/bytevectors.c: * libguile/deprecated.c: * libguile/eval.c: * libguile/feature.c: * libguile/filesys.c: * libguile/gc.c: * libguile/gdbint.c: * libguile/goops.c: * libguile/instructions.c: * libguile/load.c: * libguile/modules.c: * libguile/numbers.c: * libguile/options.c: * libguile/ports.c: * libguile/scmsigs.c: * libguile/srcprop.c: * libguile/srfi-4.c: * libguile/stacks.c: * libguile/threads.c: * libguile/vm.c: Remove calls to scm_permanent_object, as they are no longer needed with the BDW GC.
Diffstat (limited to 'libguile/deprecated.c')
-rw-r--r--libguile/deprecated.c10
1 files changed, 4 insertions, 6 deletions
diff --git a/libguile/deprecated.c b/libguile/deprecated.c
index 9364a6939..6025c7baf 100644
--- a/libguile/deprecated.c
+++ b/libguile/deprecated.c
@@ -249,15 +249,13 @@ static SCM try_module_autoload_var;
static void
init_module_stuff ()
{
-#define PERM(x) scm_permanent_object(x)
-
if (module_prefix == SCM_BOOL_F)
{
- module_prefix = PERM (scm_list_2 (scm_sym_app, scm_sym_modules));
- make_modules_in_var = PERM (scm_c_lookup ("make-modules-in"));
+ module_prefix = scm_list_2 (scm_sym_app, scm_sym_modules);
+ make_modules_in_var = scm_c_lookup ("make-modules-in");
beautify_user_module_x_var =
- PERM (scm_c_lookup ("beautify-user-module!"));
- try_module_autoload_var = PERM (scm_c_lookup ("try-module-autoload"));
+ scm_c_lookup ("beautify-user-module!");
+ try_module_autoload_var = scm_c_lookup ("try-module-autoload");
}
}