diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-05-20 12:21:33 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-05-20 12:21:33 (GMT) |
| commit | d80a12f06122cfef8370e25e4bfe14d180130f7e (patch) | |
| tree | 726c802c2b2e5514398003de4c96ff5145907162 | |
| parent | 39ef112133e88eb09bd7a2a6cdcf970659d5db09 (diff) | |
| download | tcl-d80a12f06122cfef8370e25e4bfe14d180130f7e.zip tcl-d80a12f06122cfef8370e25e4bfe14d180130f7e.tar.gz tcl-d80a12f06122cfef8370e25e4bfe14d180130f7e.tar.bz2 | |
Fix [52cc90776c]: Warning when compile with gcc v9.3.0
| -rw-r--r-- | generic/tclExecute.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index 1d5a0e8..d675e44 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -6090,7 +6090,7 @@ TEBCresume( { ClientData ptr1, ptr2; int type1, type2; - long l1, l2, lResult; + long l1 = 0, l2, lResult; case INST_NUM_TYPE: if (GetNumberFromObj(NULL, OBJ_AT_TOS, &ptr1, &type1) != TCL_OK) { @@ -9277,7 +9277,7 @@ ExecuteExtendedUnaryMathOp( int opcode, /* What operation to perform. */ Tcl_Obj *valuePtr) /* The operand on the stack. */ { - ClientData ptr; + ClientData ptr = NULL; int type; Tcl_WideInt w; mp_int big; |