summaryrefslogtreecommitdiffstats
path: root/unix/tclUnixChan.c
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2004-10-06 13:55:40 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2004-10-06 13:55:40 (GMT)
commita2e845b8cfcba7c47b0d807121454529432759aa (patch)
treed68653b1be6dc2d6cec5bfc0fc59fad060831354 /unix/tclUnixChan.c
parent65897410ae420c2548d2933582c74d6417658bb3 (diff)
downloadtcl-a2e845b8cfcba7c47b0d807121454529432759aa.zip
tcl-a2e845b8cfcba7c47b0d807121454529432759aa.tar.gz
tcl-a2e845b8cfcba7c47b0d807121454529432759aa.tar.bz2
Put braces round if bodies...
Diffstat (limited to 'unix/tclUnixChan.c')
-rw-r--r--unix/tclUnixChan.c10
1 files changed, 6 insertions, 4 deletions
diff --git a/unix/tclUnixChan.c b/unix/tclUnixChan.c
index 4a2e7b2..4d5b838 100644
--- a/unix/tclUnixChan.c
+++ b/unix/tclUnixChan.c
@@ -10,7 +10,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclUnixChan.c,v 1.50 2004/05/27 13:18:54 dkf Exp $
+ * RCS: @(#) $Id: tclUnixChan.c,v 1.51 2004/10/06 13:55:40 dkf Exp $
*/
#include "tclInt.h" /* Internal definitions for Tcl. */
@@ -3322,13 +3322,14 @@ TclpCutFileChannel(chan)
FileState **nextPtrPtr;
int removed = 0;
- if (chanPtr->typePtr != &fileChannelType)
+ if (chanPtr->typePtr != &fileChannelType) {
return;
+ }
fsPtr = (FileState *) chanPtr->instanceData;
for (nextPtrPtr = &(tsdPtr->firstFilePtr); (*nextPtrPtr) != NULL;
- nextPtrPtr = &((*nextPtrPtr)->nextPtr)) {
+ nextPtrPtr = &((*nextPtrPtr)->nextPtr)) {
if ((*nextPtrPtr) == fsPtr) {
(*nextPtrPtr) = fsPtr->nextPtr;
removed = 1;
@@ -3377,8 +3378,9 @@ TclpSpliceFileChannel(chan)
Channel *chanPtr = (Channel *) chan;
FileState *fsPtr;
- if (chanPtr->typePtr != &fileChannelType)
+ if (chanPtr->typePtr != &fileChannelType) {
return;
+ }
fsPtr = (FileState *) chanPtr->instanceData;