summaryrefslogtreecommitdiff
path: root/libguile/frames.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2009-03-27 18:40:15 -0700
committerAndy Wingo <wingo@pobox.com>2009-03-27 18:40:15 -0700
commit60ae5ca2a31a89b8930089f7dbfa3a99ac727383 (patch)
tree42d85b9e6f80a794667e852605584cec428ea69a /libguile/frames.c
parent845952664b24861b40d23660bb4509a967d1a271 (diff)
downloadguile-60ae5ca2a31a89b8930089f7dbfa3a99ac727383.tar.gz
frame, program, objcode, etc inits use load-extension
* libguile/extensions.h: Define a scm_t_extension_init_func. * libguile/frames.c: * libguile/instructions.c: * libguile/objcodes.c: * libguile/programs.c: * libguile/vm.c: Register extension init funcs. Should play nicer with a static Guile, in addition to working on Darwin with non-default installation prefixes without munging DYLD_LIBRARY_PATH. * module/system/vm/frame.scm: * module/system/vm/instruction.scm: * module/system/vm/objcode.scm: * module/system/vm/program.scm: * module/system/vm/vm.scm: Use load-extension.
Diffstat (limited to 'libguile/frames.c')
-rw-r--r--libguile/frames.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/libguile/frames.c b/libguile/frames.c
index 647cb608d..eb3bc22ee 100644
--- a/libguile/frames.c
+++ b/libguile/frames.c
@@ -297,6 +297,8 @@ scm_bootstrap_frames (void)
scm_set_smob_mark (scm_tc16_vm_frame, vm_frame_mark);
scm_set_smob_free (scm_tc16_vm_frame, vm_frame_free);
scm_set_smob_print (scm_tc16_vm_frame, vm_frame_print);
+ scm_c_register_extension ("libguile", "scm_init_frames",
+ (scm_t_extension_init_func)scm_init_frames, NULL);
}
void