summaryrefslogtreecommitdiffstats
path: root/generic/tclListObj.c
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclListObj.c')
-rw-r--r--generic/tclListObj.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/generic/tclListObj.c b/generic/tclListObj.c
index 020c725..64c4182 100644
--- a/generic/tclListObj.c
+++ b/generic/tclListObj.c
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclListObj.c,v 1.16 2003/11/01 01:20:35 dkf Exp $
+ * RCS: @(#) $Id: tclListObj.c,v 1.17 2003/11/01 01:28:04 dkf Exp $
*/
#include "tclInt.h"
@@ -235,7 +235,7 @@ Tcl_DbNewListObj(objc, objv, file, line)
Tcl_Obj *
TclNewListObjDirect(objc, objv)
int objc; /* Count of objects referenced by objv. */
- Tcl_Obj *CONST objv[]; /* An array of pointers to Tcl objects. */
+ Tcl_Obj **objv; /* An array of pointers to Tcl objects. */
{
return TclDbNewListObjDirect(objc, objv, "unknown", 0);
}
@@ -243,7 +243,7 @@ TclNewListObjDirect(objc, objv)
Tcl_Obj *
TclNewListObjDirect(objc, objv)
int objc; /* Count of objects referenced by objv. */
- Tcl_Obj *CONST objv[]; /* An array of pointers to Tcl objects. */
+ Tcl_Obj **objv; /* An array of pointers to Tcl objects. */
{
register Tcl_Obj *listPtr;
@@ -276,7 +276,7 @@ TclNewListObjDirect(objc, objv)
Tcl_Obj *
TclDbNewListObjDirect(objc, objv, file, line)
int objc; /* Count of objects referenced by objv. */
- Tcl_Obj *CONST objv[]; /* An array of pointers to Tcl objects. */
+ Tcl_Obj **objv; /* An array of pointers to Tcl objects. */
CONST char *file; /* The name of the source file calling this
* procedure; used for debugging. */
int line; /* Line number in the source file; used
@@ -311,7 +311,7 @@ TclDbNewListObjDirect(objc, objv, file, line)
Tcl_Obj *
TclDbNewListObjDirect(objc, objv, file, line)
int objc; /* Count of objects referenced by objv. */
- Tcl_Obj *CONST objv[]; /* An array of pointers to Tcl objects. */
+ Tcl_Obj **objv; /* An array of pointers to Tcl objects. */
CONST char *file; /* The name of the source file calling this
* procedure; used for debugging. */
int line; /* Line number in the source file; used