diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-04-15 22:01:00 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-04-15 22:01:00 (GMT) |
| commit | 5bef70bd07b7af46324267dc66e0f505e5df37bf (patch) | |
| tree | dcb0b2de0f33f70c6fd03c1564c22a19f276b285 /generic/tclStringRep.h | |
| parent | 246112186811206e6c2d8675c2d649fee5341b87 (diff) | |
| parent | 50698aacbf194f062d07de3bc505584f5b51de71 (diff) | |
| download | tcl-5bef70bd07b7af46324267dc66e0f505e5df37bf.zip tcl-5bef70bd07b7af46324267dc66e0f505e5df37bf.tar.gz tcl-5bef70bd07b7af46324267dc66e0f505e5df37bf.tar.bz2 | |
Merge trunk
Diffstat (limited to 'generic/tclStringRep.h')
| -rw-r--r-- | generic/tclStringRep.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclStringRep.h b/generic/tclStringRep.h index 0ab8829..f9faf2e 100644 --- a/generic/tclStringRep.h +++ b/generic/tclStringRep.h @@ -86,6 +86,7 @@ typedef struct { #define GET_STRING(objPtr) \ ((String *) (objPtr)->internalRep.twoPtrValue.ptr1) #define SET_STRING(objPtr, stringPtr) \ + ((objPtr)->internalRep.twoPtrValue.ptr2 = NULL), \ ((objPtr)->internalRep.twoPtrValue.ptr1 = (void *) (stringPtr)) /* |