jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

extra check only in debug mode

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@7894 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Marcelo Matus 2005-11-28 02:45:05 +00:00
commit 35ebeba612
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
SWIG/Source/DOH/base.c
View file

@ -18,16 +18,19 @@ char cvsroot_base_c[] = "$Header$";
* DohDelete() * DohDelete()
* ----------------------------------------------------------------------------- */ * ----------------------------------------------------------------------------- */
/* #define SWIG_DEBUG_DELETE */
void void
DohDelete(DOH *obj) { DohDelete(DOH *obj) {
DohBase *b = (DohBase *) obj; DohBase *b = (DohBase *) obj;
DohObjInfo *objinfo; DohObjInfo *objinfo;
if (!obj) return; if (!obj) return;
#ifdef SWIG_DEBUG_DELETE
if (!DohCheck(b)) { if (!DohCheck(b)) {
fputs("DOH: Fatal error. Attempt to delete a non-doh object.\n",stderr); fputs("DOH: Fatal error. Attempt to delete a non-doh object.\n",stderr);
abort(); abort();
} }
#endif
if (b->flag_intern) return; if (b->flag_intern) return;
assert(b->refcount > 0); assert(b->refcount > 0);
b->refcount--; b->refcount--;