mirrors/postgres
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Prevent core dump from calling Tcl_DontCallWhenDeleted() with a null

Browse Source 
interp pointer.  Per report from Gerhard Hintermayer.
This commit is contained in:
Tom Lane 2003-02-01 00:22:12 +00:00
parent 032235cafe
commit 361eaa185f
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/interfaces/libpgtcl/pgtclId.c
View File

@ -13,7 +13,7 @@
* Portions Copyright (c) 1994, Regents of the University of California * Portions Copyright (c) 1994, Regents of the University of California
* *
* IDENTIFICATION * IDENTIFICATION
* $Header: /cvsroot/pgsql/src/interfaces/libpgtcl/Attic/pgtclId.c,v 1.39 2003/02/01 00:07:03 tgl Exp $ * $Header: /cvsroot/pgsql/src/interfaces/libpgtcl/Attic/pgtclId.c,v 1.40 2003/02/01 00:22:12 tgl Exp $
* *
*------------------------------------------------------------------------- *-------------------------------------------------------------------------
*/ */
@ -274,8 +274,9 @@ PgDelConnectionId(DRIVER_DEL_PROTO)
Tcl_DeleteHashTable(&notifies->notify_hash); Tcl_DeleteHashTable(&notifies->notify_hash);
if (notifies->conn_loss_cmd) if (notifies->conn_loss_cmd)
ckfree((void *) notifies->conn_loss_cmd); ckfree((void *) notifies->conn_loss_cmd);
Tcl_DontCallWhenDeleted(notifies->interp, PgNotifyInterpDelete, if (notifies->interp)
(ClientData) notifies); Tcl_DontCallWhenDeleted(notifies->interp, PgNotifyInterpDelete,
(ClientData) notifies);
ckfree((void *) notifies); ckfree((void *) notifies);
} }