From d80a12f06122cfef8370e25e4bfe14d180130f7e Mon Sep 17 00:00:00 2001
From: "jan.nijtmans" <nijtmans@users.sourceforge.net>
Date: Thu, 20 May 2021 12:21:33 +0000
Subject: Fix [52cc90776c]: Warning when compile with gcc v9.3.0
---
generic/tclExecute.c | 4 ++--
1 file 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;
--
cgit v0.12