diff --git a/libguile/vm-builtins.h b/libguile/vm-builtins.h
index 0931cdced..1f8cdf6c6 100644
--- a/libguile/vm-builtins.h
+++ b/libguile/vm-builtins.h
@@ -39,6 +39,7 @@ enum scm_vm_builtins
   SCM_VM_BUILTIN_COUNT
 };
 
+SCM_INTERNAL SCM scm_vm_builtin_ref (unsigned idx);
 SCM_INTERNAL SCM scm_vm_builtin_name_to_index (SCM name);
 SCM_INTERNAL SCM scm_vm_builtin_index_to_name (SCM idx);
 SCM_INTERNAL void scm_init_vm_builtin_properties (void);
diff --git a/libguile/vm.c b/libguile/vm.c
index e14e5fe4a..83d0edda0 100644
--- a/libguile/vm.c
+++ b/libguile/vm.c
@@ -317,7 +317,7 @@ scm_i_vm_is_boot_continuation_code (uint32_t *ip)
   return ip == vm_boot_continuation_code;
 }
 
-static SCM
+SCM
 scm_vm_builtin_ref (unsigned idx)
 {
   switch (idx)