Index: generic/nsfObj.c =================================================================== diff -u -r6b1a83846ee9bd80b7ce10d88cc427bdb5585819 -r92ab630ebd3c1b907e3d0fdf97cc07914245c028 --- generic/nsfObj.c (.../nsfObj.c) (revision 6b1a83846ee9bd80b7ce10d88cc427bdb5585819) +++ generic/nsfObj.c (.../nsfObj.c) (revision 92ab630ebd3c1b907e3d0fdf97cc07914245c028) @@ -3,7 +3,7 @@ * * Tcl_Obj types provided by the Next Scripting Framework. * - * Copyright (C) 1999-2013 Gustaf Neumann + * Copyright (C) 1999-2014 Gustaf Neumann * * Permission is hereby granted, free of charge, to any person obtaining a * copy of this software and associated documentation files (the "Software"), @@ -478,6 +478,11 @@ int NsfMixinregGet(Tcl_Obj *obj, NsfClass **clPtr, Tcl_Obj **guardObj) { + + assert(obj); + assert(clPtr); + assert(guardObj); + if (obj->typePtr == &NsfMixinregObjType) { Mixinreg *mixinRegPtr = obj->internalRep.twoPtrValue.ptr1; *guardObj = mixinRegPtr->guardObj; @@ -555,10 +560,11 @@ static void FilterregDupInternalRep( Tcl_Obj *srcObjPtr, - Tcl_Obj *dstObjPtr) -{ + Tcl_Obj *dstObjPtr) { register Filterreg *srcPtr = (Filterreg *)srcObjPtr->internalRep.twoPtrValue.ptr1, *dstPtr; + assert(srcObjPtr); + assert(dstObjPtr); assert(srcPtr); #if defined(METHOD_OBJECT_TRACE) @@ -655,6 +661,11 @@ int NsfFilterregGet(Tcl_Obj *obj, Tcl_Obj **filterObj, Tcl_Obj **guardObj) { + + assert(obj); + assert(filterObj); + assert(guardObj); + if (obj->typePtr == &NsfFilterregObjType) { Filterreg *filterregPtr = obj->internalRep.twoPtrValue.ptr1; *filterObj = filterregPtr->filterObj;