diff options
| author | Dmitry Marakasov <amdmi3@FreeBSD.org> | 2009-04-01 22:31:31 +0000 |
|---|---|---|
| committer | Dmitry Marakasov <amdmi3@FreeBSD.org> | 2009-04-01 22:31:31 +0000 |
| commit | f2bb29203cbb68f917b96c09b334257f80b63e10 (patch) | |
| tree | 42a57a1560636bff450515434febabe35f0b756c /lang/qscheme/files/patch-object.h | |
| parent | - Update to 23.0 (diff) | |
- Fix build with gcc 4.2
PR: 132287
Submitted by: Vitaly Magerya <vmagerya at gmail dot com>
Approved by: Erik Greenwald <erik dot greenwald at gmail dot com> (maintainer)
Diffstat (limited to 'lang/qscheme/files/patch-object.h')
| -rw-r--r-- | lang/qscheme/files/patch-object.h | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/lang/qscheme/files/patch-object.h b/lang/qscheme/files/patch-object.h new file mode 100644 index 000000000000..e43d1c211f1e --- /dev/null +++ b/lang/qscheme/files/patch-object.h @@ -0,0 +1,16 @@ +--- object.h.orig 2009-03-03 17:43:57.000000000 +0200 ++++ object.h 2009-03-03 17:54:10.000000000 +0200 +@@ -51,10 +51,13 @@ + + #define SCM_OBJECT_VAL(x) ((SCM_ObjVal*)(SCM_CAR(x))) + #define SCM_OBJECT_DEF(x) SCM_CDR(x) ++#define SCM_OBJECT_VAL_SET(x,v) (SCM_CAR(x)=(v)) ++#define SCM_OBJECT_DEF_SET(x,v) (SCM_CDR(x)=(v)) + + /*** Accessing objdef fields */ + + #define SCM_OBJDEF_AUX(x) ((SCM_ObjDefAux*)(SCM_AUX(x))) ++#define SCM_OBJDEF_AUX_SET SCM_AUX_SET + #define SCM_OBJDEF_NDEFS(x) SCM_OBJDEF_AUX(x)->ndefs + #define SCM_OBJDEF_DEF(x,i) (SCM_OBJDEF_AUX(x)->def + i) + |