diff options
| author | dgp <dgp@users.sourceforge.net> | 2020-09-28 14:04:52 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2020-09-28 14:04:52 (GMT) |
| commit | 0a7fbe0b21886fe0b41a8f38b58a4bc4289ea823 (patch) | |
| tree | f6f4e85a932a77d26372c0f9dcd12e7d2a19b069 /generic/tclTest.c | |
| parent | 3167360c900b1cee32dd856bd7a653d657addd0b (diff) | |
| parent | 2a48060425e9950430f17b41d93732318786f5af (diff) | |
| download | tcl-0a7fbe0b21886fe0b41a8f38b58a4bc4289ea823.zip tcl-0a7fbe0b21886fe0b41a8f38b58a4bc4289ea823.tar.gz tcl-0a7fbe0b21886fe0b41a8f38b58a4bc4289ea823.tar.bz2 | |
merge 8.7
Diffstat (limited to 'generic/tclTest.c')
| -rw-r--r-- | generic/tclTest.c | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c index 91d486e..ebea6db 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -7488,8 +7488,6 @@ TestconcatobjCmd( "\n\t* (e) concatObj does not have refCount 0", NULL); } if (concatPtr == tmpPtr) { - int len; - result = TCL_ERROR; Tcl_AppendResult(interp, "\n\t* (e) concatObj is not a new obj ", NULL); @@ -7520,8 +7518,6 @@ TestconcatobjCmd( "\n\t* (f) concatObj does not have refCount 0", NULL); } if (concatPtr == tmpPtr) { - int len; - result = TCL_ERROR; Tcl_AppendResult(interp, "\n\t* (f) concatObj is not a new obj ", NULL); @@ -7553,8 +7549,6 @@ TestconcatobjCmd( "\n\t* (g) concatObj does not have refCount 0", NULL); } if (concatPtr == tmpPtr) { - int len; - result = TCL_ERROR; Tcl_AppendResult(interp, "\n\t* (g) concatObj is not a new obj ", NULL); |