summaryrefslogtreecommitdiff
path: root/libguile/objcodes.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/objcodes.c')
-rw-r--r--libguile/objcodes.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/objcodes.c b/libguile/objcodes.c
index 0515a7cb5..14ed564df 100644
--- a/libguile/objcodes.c
+++ b/libguile/objcodes.c
@@ -92,7 +92,7 @@ pointer_to_procedure (enum bytecode_kind bytecode_kind, char *ptr)
{
case BYTECODE_KIND_GUILE_2_2:
{
- return scm_i_make_rtl_program ((scm_t_uint32 *) ptr);
+ return scm_i_make_program ((scm_t_uint32 *) ptr);
}
case BYTECODE_KIND_NONE:
default: