diff options
author | dkf <dkf@noemail.net> | 2009-01-09 11:21:45 (GMT) |
---|---|---|
committer | dkf <dkf@noemail.net> | 2009-01-09 11:21:45 (GMT) |
commit | fa315dba1db389b3ab991fb90927359a8580ca06 (patch) | |
tree | 4aa51d7f8297e2b7b5f11c316610f06e345c362d /generic/tclDictObj.c | |
parent | d077fb5a5f2ad30c6467ad7cf4c40a2559cf5f64 (diff) | |
download | tcl-fa315dba1db389b3ab991fb90927359a8580ca06.zip tcl-fa315dba1db389b3ab991fb90927359a8580ca06.tar.gz tcl-fa315dba1db389b3ab991fb90927359a8580ca06.tar.bz2 |
Style fixes (unfouling whitespace, sorting comments, removing useless casts, etc.)
FossilOrigin-Name: cd3c38f00ada216d7bc93560d3d70012c2918343
Diffstat (limited to 'generic/tclDictObj.c')
-rw-r--r-- | generic/tclDictObj.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/generic/tclDictObj.c b/generic/tclDictObj.c index 1212dac..5c4295e 100644 --- a/generic/tclDictObj.c +++ b/generic/tclDictObj.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: tclDictObj.c,v 1.74 2009/01/08 16:41:34 dkf Exp $ + * RCS: @(#) $Id: tclDictObj.c,v 1.75 2009/01/09 11:21:45 dkf Exp $ */ #include "tclInt.h" @@ -162,7 +162,7 @@ typedef struct Dict { const Tcl_ObjType tclDictType = { "dict", FreeDictInternalRep, /* freeIntRepProc */ - DupDictInternalRep, /* dupIntRepProc */ + DupDictInternalRep, /* dupIntRepProc */ UpdateStringOfDict, /* updateStringProc */ SetDictFromAny /* setFromAnyProc */ }; @@ -668,8 +668,8 @@ SetDictFromAny( } TclNewObj(keyPtr); - keyPtr->bytes = s; - keyPtr->length = elemSize; + keyPtr->bytes = s; + keyPtr->length = elemSize; p = nextElem; lenRemain = (limit - nextElem); @@ -704,8 +704,8 @@ SetDictFromAny( } TclNewObj(valuePtr); - valuePtr->bytes = s; - valuePtr->length = elemSize; + valuePtr->bytes = s; + valuePtr->length = elemSize; /* * Store key and value in the hash table we're building. |