diff options
Diffstat (limited to 'libguile/struct.c')
-rw-r--r-- | libguile/struct.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/struct.c b/libguile/struct.c index 9dd900e37..33be8ad9b 100644 --- a/libguile/struct.c +++ b/libguile/struct.c @@ -420,7 +420,7 @@ SCM_DEFINE (scm_make_struct, "make-struct", 2, 0, 1, need for a lock on the section below, as it does not access or update any globals, so the critical section has been removed. */ - if (c_vtable[scm_struct_i_flags] & SCM_STRUCTF_ENTITY) + if (c_vtable[scm_struct_i_flags] & SCM_STRUCTF_GOOPS_HACK) { data = scm_alloc_struct (basic_size + tail_elts, scm_struct_entity_n_extra_words, |