diff options
Diffstat (limited to 'generic/tclBinary.c')
-rw-r--r-- | generic/tclBinary.c | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/generic/tclBinary.c b/generic/tclBinary.c index 9ba06ee..df16de8 100644 --- a/generic/tclBinary.c +++ b/generic/tclBinary.c @@ -124,9 +124,11 @@ typedef struct ByteArray { #define BYTEARRAY_SIZE(len) \ ((unsigned) (sizeof(ByteArray) - 4 + (len))) #define GET_BYTEARRAY(objPtr) \ - ((ByteArray *) (objPtr)->internalRep.otherValuePtr) -#define SET_BYTEARRAY(objPtr, baPtr) \ - (objPtr)->internalRep.otherValuePtr = (VOID *) (baPtr) + ((ByteArray *) (objPtr)->internalRep.twoPtrValue.ptr1) +#define SET_BYTEARRAY(objPtr, baPtr) do { \ + (objPtr)->internalRep.twoPtrValue.ptr2 = NULL; \ + (objPtr)->internalRep.twoPtrValue.ptr1 = (VOID *) (baPtr); \ + } while(0) /* |