diff options
Diffstat (limited to 'libguile/array-handle.c')
-rw-r--r-- | libguile/array-handle.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/libguile/array-handle.c b/libguile/array-handle.c index cd5a46698..ec3127a4a 100644 --- a/libguile/array-handle.c +++ b/libguile/array-handle.c @@ -132,8 +132,7 @@ void scm_init_array_handle (void) { #define DEFINE_ARRAY_TYPE(tag, TAG) \ - scm_i_array_element_types[SCM_ARRAY_ELEMENT_TYPE_##TAG] \ - = (scm_permanent_object (scm_from_locale_symbol (#tag))) + scm_i_array_element_types[SCM_ARRAY_ELEMENT_TYPE_##TAG] = scm_from_locale_symbol (#tag) scm_i_array_element_types[SCM_ARRAY_ELEMENT_TYPE_SCM] = SCM_BOOL_T; DEFINE_ARRAY_TYPE (a, CHAR); |