diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2007-05-03 22:15:59 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2007-05-03 22:15:59 (GMT) |
commit | e61b61a3f03fc95c9f9c7271fb705df4e84f31e0 (patch) | |
tree | f9f6ecc37d850900d1d406840508d7f3f77e910d /unix/tkUnixSend.c | |
parent | 1d327cff35030c574230508e600a5f587b64b321 (diff) | |
download | tk-e61b61a3f03fc95c9f9c7271fb705df4e84f31e0.zip tk-e61b61a3f03fc95c9f9c7271fb705df4e84f31e0.tar.gz tk-e61b61a3f03fc95c9f9c7271fb705df4e84f31e0.tar.bz2 |
Fix more type pun warnings (those not found by my local version of GCC)
Diffstat (limited to 'unix/tkUnixSend.c')
-rw-r--r-- | unix/tkUnixSend.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/unix/tkUnixSend.c b/unix/tkUnixSend.c index b348ab8..7f038b7 100644 --- a/unix/tkUnixSend.c +++ b/unix/tkUnixSend.c @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkUnixSend.c,v 1.17 2007/05/03 15:21:32 dkf Exp $ + * RCS: @(#) $Id: tkUnixSend.c,v 1.18 2007/05/03 22:16:00 dkf Exp $ */ #include "tkPort.h" @@ -265,6 +265,7 @@ RegOpen( int result, actualFormat; unsigned long bytesAfter; Atom actualType; + char **propertyPtr; if (dispPtr->commTkwin == NULL) { SendInit(interp, dispPtr); @@ -275,6 +276,7 @@ RegOpen( regPtr->locked = 0; regPtr->modified = 0; regPtr->allocedByX = 1; + propertyPtr = ®Ptr->property; if (lock && !localData.sendDebug) { XGrabServer(dispPtr->display); @@ -290,7 +292,7 @@ RegOpen( dispPtr->registryProperty, 0, MAX_PROP_WORDS, False, XA_STRING, &actualType, &actualFormat, ®Ptr->propLength, &bytesAfter, - (unsigned char **) ®Ptr->property); + (unsigned char **) propertyPtr); if (actualType == None) { regPtr->propLength = 0; |