diff options
author | mdejong <mdejong> | 2003-07-16 02:17:06 (GMT) |
---|---|---|
committer | mdejong <mdejong> | 2003-07-16 02:17:06 (GMT) |
commit | 707fb60617271458080e2dcb189d1d4580f20dff (patch) | |
tree | 704a9c3d8be3849a768bf1c9af3ea016bc904ab8 /unix/dltest | |
parent | 6e2755b218e6f9902e0b316830c39c1308aaf748 (diff) | |
download | tcl-707fb60617271458080e2dcb189d1d4580f20dff.zip tcl-707fb60617271458080e2dcb189d1d4580f20dff.tar.gz tcl-707fb60617271458080e2dcb189d1d4580f20dff.tar.bz2 |
* unix/dltest/pkga.c (Pkga_EqObjCmd): Fix typo
that was causing a crash in load.test.
Diffstat (limited to 'unix/dltest')
-rw-r--r-- | unix/dltest/pkga.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/unix/dltest/pkga.c b/unix/dltest/pkga.c index 9957158..da5a439 100644 --- a/unix/dltest/pkga.c +++ b/unix/dltest/pkga.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: pkga.c,v 1.6 2003/07/15 23:57:33 dgp Exp $ + * RCS: @(#) $Id: pkga.c,v 1.7 2003/07/16 02:17:06 mdejong Exp $ */ #include "tcl.h" @@ -48,7 +48,7 @@ Pkga_EqObjCmd(dummy, interp, objc, objv) Tcl_Obj * CONST objv[]; /* Argument objects. */ { int result; - CONST char *str1, str2; + CONST char *str1, *str2; int len1, len2, n; if (objc != 3) { |