diff options
| author | donal.k.fellows@manchester.ac.uk <dkf> | 2007-05-03 22:15:59 (GMT) |
|---|---|---|
| committer | donal.k.fellows@manchester.ac.uk <dkf> | 2007-05-03 22:15:59 (GMT) |
| commit | e32d67de4194640b22eef62294d1043330bed909 (patch) | |
| tree | f9f6ecc37d850900d1d406840508d7f3f77e910d /unix/tkUnixEvent.c | |
| parent | b95dd9e2c0eb6efadf338142c7dbeac92a905927 (diff) | |
| download | tk-e32d67de4194640b22eef62294d1043330bed909.zip tk-e32d67de4194640b22eef62294d1043330bed909.tar.gz tk-e32d67de4194640b22eef62294d1043330bed909.tar.bz2 | |
Fix more type pun warnings (those not found by my local version of GCC)
Diffstat (limited to 'unix/tkUnixEvent.c')
| -rw-r--r-- | unix/tkUnixEvent.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/unix/tkUnixEvent.c b/unix/tkUnixEvent.c index 46caeb3..dde8432 100644 --- a/unix/tkUnixEvent.c +++ b/unix/tkUnixEvent.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkUnixEvent.c,v 1.23 2007/01/12 09:08:36 dkf Exp $ + * RCS: @(#) $Id: tkUnixEvent.c,v 1.24 2007/05/03 22:16:00 dkf Exp $ */ #include "tkInt.h" @@ -480,7 +480,7 @@ TkUnixDoOneXEvent( struct timeval blockTime, *timeoutPtr; Tcl_Time now; int fd, index, numFound, numFdBits = 0; - fd_mask bit; + fd_mask bit, *readMaskPtr = readMask; /* * Look for queued events first. @@ -537,7 +537,7 @@ TkUnixDoOneXEvent( } } - numFound = select(numFdBits, (SELECT_MASK *) readMask, NULL, NULL, + numFound = select(numFdBits, (SELECT_MASK *) readMaskPtr, NULL, NULL, timeoutPtr); if (numFound <= 0) { /* |