diff options
author | hobbs <hobbs@noemail.net> | 2001-11-14 23:17:01 (GMT) |
---|---|---|
committer | hobbs <hobbs@noemail.net> | 2001-11-14 23:17:01 (GMT) |
commit | 790913f75a784d5e869e4dc7b8c7aa36494005eb (patch) | |
tree | e2099b7a9dc4bb4dc572f484ee86baf5db2c28ae /generic/tclInt.decls | |
parent | 64916862c32081813b93fc1e088a37a8323b972a (diff) | |
download | tcl-790913f75a784d5e869e4dc7b8c7aa36494005eb.zip tcl-790913f75a784d5e869e4dc7b8c7aa36494005eb.tar.gz tcl-790913f75a784d5e869e4dc7b8c7aa36494005eb.tar.bz2 |
Reference implementation of TIP's #22, #33 and #45. Adds the
ability of the [lindex] command to have multiple index arguments,
and adds the [lset] command. Both commands are byte-code compiled.
[Patch #471874] (work by Kenny, commited by Hobbs)
FossilOrigin-Name: 8e0db83abc5d97d0c5f9c8cbb3229ddc8e3a78da
Diffstat (limited to 'generic/tclInt.decls')
-rw-r--r-- | generic/tclInt.decls | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/generic/tclInt.decls b/generic/tclInt.decls index c7aaa0a..815b88c 100644 --- a/generic/tclInt.decls +++ b/generic/tclInt.decls @@ -7,10 +7,12 @@ # files # # Copyright (c) 1998-1999 by Scriptics Corporation. +# Copyright (c) 2001 by Kevin B. Kenny. All rights reserved. +# # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: tclInt.decls,v 1.35 2001/10/15 20:26:57 andreas_kupries Exp $ +# RCS: @(#) $Id: tclInt.decls,v 1.36 2001/11/14 23:17:03 hobbs Exp $ library tcl @@ -647,6 +649,14 @@ declare 165 generic { void TclpSetInitialEncodings(void) } +# New function due to TIP #33 +declare 166 generic { + int TclListObjSetElement( Tcl_Interp* interp, + Tcl_Obj* listPtr, + int index, + Tcl_Obj* valuePtr ) +} + ############################################################################## # Define the platform specific internal Tcl interface. These functions are |