diff options
Diffstat (limited to 'libguile/unif.h')
-rw-r--r-- | libguile/unif.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/unif.h b/libguile/unif.h index 14ff17904..3da009a12 100644 --- a/libguile/unif.h +++ b/libguile/unif.h @@ -98,7 +98,7 @@ extern scm_bits_t scm_tc16_array; #define SCM_ARRAY_MEM(a) ((scm_array_t *) SCM_CELL_WORD_1 (a)) #define SCM_ARRAY_V(a) (SCM_ARRAY_MEM (a)->v) #define SCM_ARRAY_BASE(a) (SCM_ARRAY_MEM (a)->base) -#define SCM_ARRAY_DIMS(a) ((scm_array_dim_t *)((char *) SCM_ARRAY_MEM (a) + sizeof (scm_array))) +#define SCM_ARRAY_DIMS(a) ((scm_array_dim_t *)((char *) SCM_ARRAY_MEM (a) + sizeof (scm_array_t))) #define SCM_I_MAX_LENGTH ((scm_ubits_t)((scm_bits_t)-1) >> 8) |