diff options
author | mdejong <mdejong> | 2003-07-16 02:16:13 (GMT) |
---|---|---|
committer | mdejong <mdejong> | 2003-07-16 02:16:13 (GMT) |
commit | af4fffcaf51b39202021c4aeb6b85257f19800b5 (patch) | |
tree | 5b234e78c0f3b338372f1f5e7aabd36d2323acbf /unix/dltest | |
parent | b69d7b96da0443f8ad20004d1548eabd7c32e095 (diff) | |
download | tcl-af4fffcaf51b39202021c4aeb6b85257f19800b5.zip tcl-af4fffcaf51b39202021c4aeb6b85257f19800b5.tar.gz tcl-af4fffcaf51b39202021c4aeb6b85257f19800b5.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 7fb9524..8dd87ae 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.4.24.1 2003/07/15 23:54:53 dgp Exp $ + * RCS: @(#) $Id: pkga.c,v 1.4.24.2 2003/07/16 02:16:14 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) { |