diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-10-01 12:38:14 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-10-01 12:38:14 (GMT) |
| commit | 09fd21b65b23d0d8ee709bb09cc48d0d4829db90 (patch) | |
| tree | 14979096414414a6fece845f3539aa33a899e8ad /generic/tclTest.c | |
| parent | 194cfb5382a54b18c200fa8c32f9aeae98e07d8a (diff) | |
| parent | cb6ae544245fea42d68f1f1c0c3ab5fd92babcaf (diff) | |
| download | tcl-09fd21b65b23d0d8ee709bb09cc48d0d4829db90.zip tcl-09fd21b65b23d0d8ee709bb09cc48d0d4829db90.tar.gz tcl-09fd21b65b23d0d8ee709bb09cc48d0d4829db90.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 5ebbfdd..1523666 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); |