diff options
Diffstat (limited to 'libguile/struct.h')
-rw-r--r-- | libguile/struct.h | 14 |
1 files changed, 6 insertions, 8 deletions
diff --git a/libguile/struct.h b/libguile/struct.h index 0dfcf4618..25d5ae53f 100644 --- a/libguile/struct.h +++ b/libguile/struct.h @@ -56,7 +56,6 @@ #define SCM_VTABLE_BASE_LAYOUT \ "pr" /* layout */ \ "uh" /* flags */ \ - "sr" /* self */ \ "uh" /* finalizer */ \ "pw" /* printer */ \ "ph" /* name (hidden from make-struct for back-compat reasons) */ \ @@ -65,13 +64,12 @@ #define scm_vtable_index_layout 0 /* A symbol describing the physical arrangement of this type. */ #define scm_vtable_index_flags 1 /* Class flags */ -#define scm_vtable_index_self 2 /* A pointer to the vtable itself */ -#define scm_vtable_index_instance_finalize 3 /* Finalizer for instances of this struct type. */ -#define scm_vtable_index_instance_printer 4 /* A printer for this struct type. */ -#define scm_vtable_index_name 5 /* Name of this vtable. */ -#define scm_vtable_index_size 6 /* Number of fields, for simple structs. */ -#define scm_vtable_index_reserved_7 7 -#define scm_vtable_offset_user 8 /* Where do user fields start in the vtable? */ +#define scm_vtable_index_instance_finalize 2 /* Finalizer for instances of this struct type. */ +#define scm_vtable_index_instance_printer 3 /* A printer for this struct type. */ +#define scm_vtable_index_name 4 /* Name of this vtable. */ +#define scm_vtable_index_size 5 /* Number of fields, for simple structs. */ +#define scm_vtable_index_reserved_7 6 +#define scm_vtable_offset_user 7 /* Where do user fields start in the vtable? */ /* All applicable structs have the following fields. */ #define SCM_APPLICABLE_BASE_LAYOUT \ |