Index: generic/nsfDebug.c =================================================================== diff -u -r0a96330dfacd0df74641159e61dca74f0576ba1d -rcaba76f5ac2943f5a3dfd33550cb578132f40c80 --- generic/nsfDebug.c (.../nsfDebug.c) (revision 0a96330dfacd0df74641159e61dca74f0576ba1d) +++ generic/nsfDebug.c (.../nsfDebug.c) (revision caba76f5ac2943f5a3dfd33550cb578132f40c80) @@ -3,7 +3,7 @@ * * Debugging facilities for the Next Scripting Framework. * - * Copyright (C) 1999-2012 Gustaf Neumann + * Copyright (C) 1999-2014 Gustaf Neumann * Copyright (C) 1999-2007 Uwe Zdun * * Permission is hereby granted, free of charge, to any person obtaining a @@ -328,9 +328,6 @@ NsfMemCountRelease() { int *tableInitialized; Tcl_HashTable *tablePtr = NsfMemCountGetTable(&tableInitialized); - Tcl_HashSearch search; - Tcl_HashEntry *hPtr; - int count = 0; #ifdef NSF_MEM_TRACE fprintf(stderr, "+++ release count %d\n", *tableInitialized); @@ -342,6 +339,10 @@ } if (*tableInitialized == 1) { + Tcl_HashSearch search; + Tcl_HashEntry *hPtr; + int count = 0; + fprintf(stderr, "******** NSF MEM Count *********\n* count peak\n"); for (hPtr = Tcl_FirstHashEntry(tablePtr, &search); hPtr != NULL;