diff options
author | andreas_kupries <akupries@shaw.ca> | 2010-11-23 20:01:18 (GMT) |
---|---|---|
committer | andreas_kupries <akupries@shaw.ca> | 2010-11-23 20:01:18 (GMT) |
commit | f2b2931008f39ae6f8fd977c0315178099fa9d8b (patch) | |
tree | a8181c12eec2fb39a76fdf7431379199894b1d67 | |
parent | e308d555ace980d925c685d9882c9ca5c3922ca0 (diff) | |
download | tcl-f2b2931008f39ae6f8fd977c0315178099fa9d8b.zip tcl-f2b2931008f39ae6f8fd977c0315178099fa9d8b.tar.gz tcl-f2b2931008f39ae6f8fd977c0315178099fa9d8b.tar.bz2 |
* generic/tclVar.c (VarHashInvalidateEntry): Removed obsolete
patch for AIX defining this macro as function. This is not
necessary anymore. See ChangeLog entry 2010-07-28 (Bug 3037525)
for the actual bug and fix the patch was a workaround for.
-rw-r--r-- | ChangeLog | 7 | ||||
-rw-r--r-- | generic/tclVar.c | 13 |
2 files changed, 8 insertions, 12 deletions
@@ -1,3 +1,10 @@ +2010-11-23 Andreas Kupries <andreask@activestate.com> + + * generic/tclVar.c (VarHashInvalidateEntry): Removed obsolete + patch for AIX defining this macro as function. This is not + necessary anymore. See ChangeLog entry 2010-07-28 (Bug 3037525) + for the actual bug and fix the patch was a workaround for. + 2010-11-19 Jan Nijtmans <nijtmans@users.sf.net> * generic/tclInterp.c: fix gcc warning: passing argument 3 of diff --git a/generic/tclVar.c b/generic/tclVar.c index edce98d..ea4b7ff 100644 --- a/generic/tclVar.c +++ b/generic/tclVar.c @@ -16,7 +16,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclVar.c,v 1.160.2.11 2010/09/01 19:42:40 andreas_kupries Exp $ + * RCS: @(#) $Id: tclVar.c,v 1.160.2.12 2010/11/23 20:01:18 andreas_kupries Exp $ */ #include "tclInt.h" @@ -67,19 +67,8 @@ VarHashCreateVar( #define VarHashFindVar(tablePtr, key) \ VarHashCreateVar((tablePtr), (key), NULL) -#ifdef _AIX -/* Work around AIX cc problem causing crash in TclDeleteVars. Possible - * optimizer bug. Do _NOT_ inline this function, this re-activates the - * problem. - */ -static void -VarHashInvalidateEntry(Var* varPtr) { - varPtr->flags |= VAR_DEAD_HASH; -} -#else #define VarHashInvalidateEntry(varPtr) \ ((varPtr)->flags |= VAR_DEAD_HASH) -#endif #define VarHashDeleteEntry(varPtr) \ Tcl_DeleteHashEntry(&(((VarInHash *) varPtr)->entry)) |