diff options
author | Ludovic Courtès <ludo@gnu.org> | 2010-01-26 00:00:58 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2010-01-26 00:00:58 +0100 |
commit | e03b7f73e2927178f2d9485320435edb6260c311 (patch) | |
tree | 1de60bf13065a5ef6bc7bf58a1e48a492c5468ff /libguile/struct.h | |
parent | bb190ddbba216251f2a8490adf9feadf0dbb7104 (diff) | |
download | guile-e03b7f73e2927178f2d9485320435edb6260c311.tar.gz |
Recognize structs with both "pr" and "pw" flags as simple.
* libguile/struct.c (set_vtable_layout_flags): Keep the
`SCM_VTABLE_FLAG_SIMPLE' flag when VTABLE has a mixture of `r' and `w'
fields.
* libguile/struct.h (SCM_VTABLE_FLAG_SIMPLE): Adjust comment.
Diffstat (limited to 'libguile/struct.h')
-rw-r--r-- | libguile/struct.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/struct.h b/libguile/struct.h index 374a5ce74..d2a05af2a 100644 --- a/libguile/struct.h +++ b/libguile/struct.h @@ -107,7 +107,7 @@ #define SCM_VTABLE_FLAG_APPLICABLE (1L << 2) /* instances of this vtable are applicable? */ #define SCM_VTABLE_FLAG_SETTER_VTABLE (1L << 3) /* instances of this vtable are applicable-with-setter vtables? */ #define SCM_VTABLE_FLAG_SETTER (1L << 4) /* instances of this vtable are applicable-with-setters? */ -#define SCM_VTABLE_FLAG_SIMPLE (1L << 5) /* instances of this vtable have only "pr" fields */ +#define SCM_VTABLE_FLAG_SIMPLE (1L << 5) /* instances of this vtable have only "p" fields */ #define SCM_VTABLE_FLAG_SIMPLE_RW (1L << 6) /* instances of this vtable have only "pw" fields */ #define SCM_VTABLE_FLAG_SMOB_0 (1L << 7) #define SCM_VTABLE_FLAG_GOOPS_0 (1L << 8) |