diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 2000-03-12 17:52:18 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 2000-03-12 17:52:18 +0000 |
commit | 4d45e7b69aaa0529653963df75e16b31fbada8eb (patch) | |
tree | 12f026438d1b3375a9f97415a184a33dbaa5e822 /libguile/struct.c | |
parent | 0bc908e7c448940099612b3bd1d10356652241ee (diff) | |
download | guile-4d45e7b69aaa0529653963df75e16b31fbada8eb.tar.gz |
* stacks.c, stacks.h, struct.c, tags.h, unif.c (scm_bits_t):
Renamed from SCMWORD.
Diffstat (limited to 'libguile/struct.c')
-rw-r--r-- | libguile/struct.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/struct.c b/libguile/struct.c index 7c59a409d..d6d2ea02d 100644 --- a/libguile/struct.c +++ b/libguile/struct.c @@ -326,7 +326,7 @@ scm_alloc_struct (int n_words, int n_extra, char *who) SCM *p = block + n_extra; /* Adjust it even further so it's aligned on an eight-byte boundary. */ - p = (SCM *) (((SCMWORD) SCM_BITS (p) + 7) & ~7); + p = (SCM *) (((scm_bits_t) SCM_BITS (p) + 7) & ~7); /* Initialize a few fields as described above. */ p[scm_struct_i_free] = (SCM) scm_struct_free_standard; @@ -522,7 +522,7 @@ SCM_DEFINE (scm_struct_ref, "struct-ref", 2, 0, 0, SCM * data; SCM layout; int p; - SCMWORD n_fields; + scm_bits_t n_fields; unsigned char * fields_desc; unsigned char field_type = 0; |