1 files changed, 22 insertions, 22 deletions

diff --git a/generic/tclDictObj.c b/generic/tclDictObj.c
index 8c34bb8..ca86ed8 100644
--- a/generic/tclDictObj.c
+++ b/generic/tclDictObj.c
@@ -150,19 +150,19 @@ const Tcl_ObjType tclDictType = {
     TCL_OBJTYPE_V0
 };
 
-#define DictSetInternalRep(objPtr, dictRepPtr)				\
-    do {                                                                \
-        Tcl_ObjInternalRep ir;						\
-        ir.twoPtrValue.ptr1 = (dictRepPtr);                             \
-        ir.twoPtrValue.ptr2 = NULL;                                     \
-        Tcl_StoreInternalRep((objPtr), &tclDictType, &ir);		\
+#define DictSetInternalRep(objPtr, dictRepPtr) \
+    do {								\
+	Tcl_ObjInternalRep ir;						\
+	ir.twoPtrValue.ptr1 = (dictRepPtr);				\
+	ir.twoPtrValue.ptr2 = NULL;					\
+	Tcl_StoreInternalRep((objPtr), &tclDictType, &ir);		\
     } while (0)
 
-#define DictGetInternalRep(objPtr, dictRepPtr)				\
-    do {                                                                \
-        const Tcl_ObjInternalRep *irPtr;				\
-        irPtr = TclFetchInternalRep((objPtr), &tclDictType);		\
-        (dictRepPtr) = irPtr ? (Dict *)irPtr->twoPtrValue.ptr1 : NULL;	\
+#define DictGetInternalRep(objPtr, dictRepPtr) \
+    do {								\
+	const Tcl_ObjInternalRep *irPtr;				\
+	irPtr = TclFetchInternalRep((objPtr), &tclDictType);		\
+	(dictRepPtr) = irPtr ? (Dict *)irPtr->twoPtrValue.ptr1 : NULL;	\
     } while (0)
 
 /*
@@ -177,7 +177,7 @@ const Tcl_ObjType tclDictType = {
 
 static const Tcl_HashKeyType chainHashType = {
     TCL_HASH_KEY_TYPE_VERSION,
-    TCL_HASH_KEY_DIRECT_COMPARE,        /* allows compare keys by pointers */
+    TCL_HASH_KEY_DIRECT_COMPARE,	/* allows compare keys by pointers */
     TclHashObjKey,
     TclCompareObjKeys,
     AllocChainEntry,
@@ -1264,7 +1264,7 @@ Tcl_DictObjNext(
 
 void
 Tcl_DictObjDone(
-    Tcl_DictSearch *searchPtr)		/* Pointer to a hash search context. */
+    Tcl_DictSearch *searchPtr)	/* Pointer to a hash search context. */
 {
     Dict *dict;
 
@@ -1316,7 +1316,7 @@ Tcl_DictObjPutKeyList(
 	Tcl_Panic("%s called with empty key list", "Tcl_DictObjPutKeyList");
     }
 
-    dictPtr = TclTraceDictPath(interp, dictPtr, keyc-1,keyv, DICT_PATH_CREATE);
+    dictPtr = TclTraceDictPath(interp, dictPtr, keyc-1, keyv, DICT_PATH_CREATE);
     if (dictPtr == NULL) {
 	return TCL_ERROR;
     }
@@ -1374,7 +1374,7 @@ Tcl_DictObjRemoveKeyList(
 	Tcl_Panic("%s called with empty key list", "Tcl_DictObjRemoveKeyList");
     }
 
-    dictPtr = TclTraceDictPath(interp, dictPtr, keyc-1,keyv, DICT_PATH_UPDATE);
+    dictPtr = TclTraceDictPath(interp, dictPtr, keyc-1, keyv, DICT_PATH_UPDATE);
     if (dictPtr == NULL) {
 	return TCL_ERROR;
     }
@@ -1612,7 +1612,7 @@ DictGetCmd(
      * Note that this loop always executes at least once.
      */
 
-    dictPtr = TclTraceDictPath(interp, objv[1], objc-3,objv+2, DICT_PATH_READ);
+    dictPtr = TclTraceDictPath(interp, objv[1], objc-3, objv+2, DICT_PATH_READ);
     if (dictPtr == NULL) {
 	return TCL_ERROR;
     }
@@ -2005,7 +2005,7 @@ DictValuesCmd(
     }
     listPtr = Tcl_NewListObj(0, NULL);
     for (; !done ; Tcl_DictObjNext(&search, NULL, &valuePtr, &done)) {
-	if (pattern==NULL || Tcl_StringMatch(TclGetString(valuePtr),pattern)) {
+	if (pattern==NULL || Tcl_StringMatch(TclGetString(valuePtr), pattern)) {
 	    /*
 	     * Assume this operation always succeeds.
 	     */
@@ -2144,7 +2144,7 @@ DictExistsCmd(
 	return TCL_ERROR;
     }
 
-    dictPtr = TclTraceDictPath(NULL, objv[1], objc-3, objv+2,DICT_PATH_EXISTS);
+    dictPtr = TclTraceDictPath(NULL, objv[1], objc-3, objv+2, DICT_PATH_EXISTS);
     if (dictPtr == NULL || dictPtr == DICT_PATH_NON_EXISTENT ||
 	    Tcl_DictObjGet(NULL, dictPtr, objv[objc-1], &valuePtr) != TCL_OK) {
 	Tcl_SetObjResult(interp, Tcl_NewBooleanObj(0));
@@ -2809,7 +2809,7 @@ DictMapNRCmd(
      * Run the script.
      */
 
-    TclNRAddCallback(interp, DictMapLoopCallback, storagePtr, NULL,NULL,NULL);
+    TclNRAddCallback(interp, DictMapLoopCallback, storagePtr, NULL, NULL, NULL);
     return TclNREvalObjEx(interp, storagePtr->scriptObj, 0,
 	    iPtr->cmdFramePtr, 3);
 
@@ -2899,7 +2899,7 @@ DictMapLoopCallback(
      * Run the script.
      */
 
-    TclNRAddCallback(interp, DictMapLoopCallback, storagePtr, NULL,NULL,NULL);
+    TclNRAddCallback(interp, DictMapLoopCallback, storagePtr, NULL, NULL, NULL);
     return TclNREvalObjEx(interp, storagePtr->scriptObj, 0,
 	    iPtr->cmdFramePtr, 3);
 
@@ -3080,7 +3080,7 @@ DictFilterCmd(
 	return TCL_ERROR;
     }
     if (Tcl_GetIndexFromObj(interp, objv[2], filters, "filterType",
-	     0, &index) != TCL_OK) {
+	    0, &index) != TCL_OK) {
 	return TCL_ERROR;
     }
 
@@ -3390,7 +3390,7 @@ DictUpdateCmd(
     objPtr = Tcl_NewListObj(objc-3, objv+2);
     Tcl_IncrRefCount(objPtr);
     Tcl_IncrRefCount(objv[1]);
-    TclNRAddCallback(interp, FinalizeDictUpdate, objv[1], objPtr, NULL,NULL);
+    TclNRAddCallback(interp, FinalizeDictUpdate, objv[1], objPtr, NULL, NULL);
 
     return TclNREvalObjEx(interp, objv[objc-1], 0, iPtr->cmdFramePtr, objc-1);
 }