diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2017-03-29 19:05:17 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2017-03-29 19:05:17 (GMT) |
commit | 41c4744202449c4e812732d5ff09104f866c1409 (patch) | |
tree | d9caab421f0c54c79ac7ebe566618ad065d9b925 /generic/tclOOCall.c | |
parent | e18d7f592196530ea7602ea21a0a5341f08f960c (diff) | |
download | tcl-41c4744202449c4e812732d5ff09104f866c1409.zip tcl-41c4744202449c4e812732d5ff09104f866c1409.tar.gz tcl-41c4744202449c4e812732d5ff09104f866c1409.tar.bz2 |
Tweak to make tests a little clearer.bug_900cb0284bc
Diffstat (limited to 'generic/tclOOCall.c')
-rw-r--r-- | generic/tclOOCall.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclOOCall.c b/generic/tclOOCall.c index c861eb9..ac0b94d 100644 --- a/generic/tclOOCall.c +++ b/generic/tclOOCall.c @@ -618,8 +618,8 @@ AddClassMethodNames( if (isNew) { int isWanted = (!(flags & PUBLIC_METHOD) || (mPtr->flags & PUBLIC_METHOD)) ? IN_LIST : 0; - isWanted |= (mPtr->typePtr == NULL ? NO_IMPLEMENTATION : 0); + isWanted |= (mPtr->typePtr == NULL ? NO_IMPLEMENTATION : 0); Tcl_SetHashValue(hPtr, INT2PTR(isWanted)); } else if ((PTR2INT(Tcl_GetHashValue(hPtr)) & NO_IMPLEMENTATION) && mPtr->typePtr != NULL) { |