diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-10-13 20:26:00 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-10-13 20:26:00 (GMT) |
| commit | 787d71bc6d8d517220c6b301345bf816bcecab2f (patch) | |
| tree | 85e35e9a031fa5a5828865223ad78878537d966e /generic/tclEvent.c | |
| parent | 619cb58e37350334a638f134b25cf98f238d1e34 (diff) | |
| download | tcl-787d71bc6d8d517220c6b301345bf816bcecab2f.zip tcl-787d71bc6d8d517220c6b301345bf816bcecab2f.tar.gz tcl-787d71bc6d8d517220c6b301345bf816bcecab2f.tar.bz2 | |
Bug 3576509: tcl::Bgerror crashes with invalid arguments
Diffstat (limited to 'generic/tclEvent.c')
| -rw-r--r-- | generic/tclEvent.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclEvent.c b/generic/tclEvent.c index 7daa7bb..1d72a0a 100644 --- a/generic/tclEvent.c +++ b/generic/tclEvent.c @@ -309,7 +309,7 @@ TclDefaultBgErrorHandlerObjCmd( int objc, /* Number of arguments. */ Tcl_Obj *CONST objv[]) /* Argument objects. */ { - Tcl_Obj *keyPtr, *valuePtr; + Tcl_Obj *keyPtr, *valuePtr = NULL; Tcl_Obj *tempObjv[2]; int code, level; Tcl_InterpState saved; |