diff options
Diffstat (limited to 'libguile/bytevectors.c')
-rw-r--r-- | libguile/bytevectors.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/libguile/bytevectors.c b/libguile/bytevectors.c index 75028aee1..9e9586d75 100644 --- a/libguile/bytevectors.c +++ b/libguile/bytevectors.c @@ -2117,12 +2117,16 @@ scm_bootstrap_bytevectors (void) { scm_t_array_implementation impl; + impl.tag = scm_tc16_bytevector; impl.mask = 0xffff; impl.vref = bv_handle_ref; impl.vset = bv_handle_set_x; impl.get_handle = bytevector_get_handle; scm_i_register_array_implementation (&impl); + scm_i_register_vector_constructor + (scm_i_array_element_types[SCM_ARRAY_ELEMENT_TYPE_VU8], + scm_make_bytevector); } } |