Tcl Library Procedures Tcl_ListObj(3TCL)
_________________________________________________________________
NAME
Tcl_ListObjAppendList, Tcl_ListObjAppendElement,
Tcl_NewListObj, Tcl_SetListObj, Tcl_ListObjGetElements,
Tcl_ListObjLength, Tcl_ListObjIndex, Tcl_ListObjReplace -
manipulate Tcl objects as listsSYNOPSIS
#include
intTcl_ListObjAppendList(interp, listPtr, elemListPtr)
intTcl_ListObjAppendElement(interp, listPtr, objPtr)
Tcl_Obj *
Tcl_NewListObj(objc, objv)
Tcl_SetListObj(objPtr, objc, objv)
intTcl_ListObjGetElements(interp, listPtr, objcPtr, objvPtr)
intTcl_ListObjLength(interp, listPtr, intPtr)
intTcl_ListObjIndex(interp, listPtr, index, objPtrPtr)
intTcl_ListObjReplace(interp, listPtr, first, count, objc, objv)
ARGUMENTSTcl_Interp *interp (in) If an error occurs
while converting an object to be a listobject, an error mes-
sage is left in the interpreter's result object unless interp is NULL.Tcl_Obj *listPtr (in/out) Points to the list
object to be manipu-
lated. If listPtr does not already point to a list object, an attemptwill be made to con-
vert it to one. Tcl Last change: 8.0 1Tcl Library Procedures Tcl_ListObj(3TCL)
Tcl_Obj *elemListPtr (in/out) For
Tcl_ListObjAppendList,
this points to a list object containing elements to be appended ontolistPtr. Each ele-
ment of *elemListPtr will become a new element of listPtr. If *elemListPtr is not NULL and does not already point to a list object, an attempt will be made to convert it to one.Tcl_Obj *objPtr (in) For
Tcl_ListObjAppendElement,
points to the Tcl object that will be appended to listPtr.For Tcl_SetListObj,
this points to the Tcl object that will be converted to alist object contain-
ing the objc elementsof the array refer-
enced by objv. int *objcPtr (in) Points to location whereTcl_ListObjGetElements
stores the number of element objects in listPtr.Tcl_Obj ***objvPtr (out) A location where
Tcl_ListObjGetElements
stores a pointer to an array of pointers to the element objects of listPtr. int objc (in) The number of Tcl objects thatTcl_NewListObj will
insert into a new list object, andTcl_ListObjReplace
will insert into Tcl Last change: 8.0 2Tcl Library Procedures Tcl_ListObj(3TCL)
listPtr. ForTcl_SetListObj, the
number of Tcl objects to insert into objPtr. |Tcl_Obj "*CONST |
objv[]" in || An array of pointers | to objects. |Tcl_NewListObj will |
insert these objects | into a new list | object and |Tcl_ListObjReplace |
will insert them into | an existing listPtr. | Each object will | become a separate | list element. int *intPtr (out) Points to location whereTcl_ListObjLength
stores the length of the list. int index (in) Index of the list element thatTcl_ListObjIndex is
to return. The first element has index 0.Tcl_Obj **objPtrPtr (out) Points to place where
Tcl_ListObjIndex is
to store a pointer to the resulting list element object. int first (in) Index of the starting list element thatTcl_ListObjReplace is
to replace. The list's first element has index 0.int count (in) The number of ele-
ments thatTcl_ListObjReplace is
to replace._________________________________________________________________
Tcl Last change: 8.0 3Tcl Library Procedures Tcl_ListObj(3TCL)
DESCRIPTION
Tcl list objects have an internal representation that sup-
ports the efficient indexing and appending. The procedures described in this man page are used to create, modify, index, and append to Tcl list objects from C code.Tcl_ListObjAppendList and Tcl_ListObjAppendElement both add
one or more objects to the end of the list object referencedby listPtr. Tcl_ListObjAppendList appends each element of
the list object referenced by elemListPtr whileTcl_ListObjAppendElement appends the single object refer-
enced by objPtr. Both procedures will convert the object referenced by listPtr to a list object if necessary. If an error occurs during conversion, both procedures returnTCL_ERROR and leave an error message in the interpreter's
result object if interp is not NULL. Similarly, if elem-
ListPtr does not already refer to a list object,Tcl_ListObjAppendList will attempt to convert it to one and
if an error occurs during conversion, will return TCL_ERROR
and leave an error message in the interpreter's result object if interp is not NULL. Both procedures invalidateany old string representation of listPtr and, if it was con-
verted to a list object, free any old internal representa-
tion. Similarly, Tcl_ListObjAppendList frees any old inter-
nal representation of elemListPtr if it converts it to a list object. After appending each element in elemListPtr,Tcl_ListObjAppendList increments the element's reference
count since listPtr now also refers to it. For the samereason, Tcl_ListObjAppendElement increments objPtr's refer-
ence count. If no error occurs, the two procedures returnTCL_OK after appending the objects.
Tcl_NewListObj and Tcl_SetListObj create a new object or
modify an existing object to hold the objc elements of the array referenced by objv where each element is a pointer to a Tcl object. If objc is less than or equal to zero, theyreturn an empty object. The new object's string representa-
tion is left invalid. The two procedures increment the reference counts of the elements in objc since the list object now refers to them. The new list object returned byTcl_NewListObj has reference count zero.
Tcl_ListObjGetElements returns a count and a pointer to an
array of the elements in a list object. It returns the count by storing it in the address objcPtr. Similarly, it returns the array pointer by storing it in the address objvPtr. The memory pointed to is managed by Tcl and should not be freed by the caller. If listPtr is not already alist object, Tcl_ListObjGetElements will attempt to convert
it to one; if the conversion fails, it returns TCL_ERROR and
leaves an error message in the interpreter's result objectif interp is not NULL. Otherwise it returns TCL_OK after
Tcl Last change: 8.0 4Tcl Library Procedures Tcl_ListObj(3TCL)
storing the count and array pointer.Tcl_ListObjLength returns the number of elements in the list
object referenced by listPtr. It returns this count by storing an integer in the address intPtr. If the object isnot already a list object, Tcl_ListObjLength will attempt to
convert it to one; if the conversion fails, it returnsTCL_ERROR and leaves an error message in the interpreter's
result object if interp is not NULL. Otherwise it returnsTCL_OK after storing the list's length.
The procedure Tcl_ListObjIndex returns a pointer to the
object at element index in the list referenced by listPtr. It returns this object by storing a pointer to it in the address objPtrPtr. If listPtr does not already refer to alist object, Tcl_ListObjIndex will attempt to convert it to
one; if the conversion fails, it returns TCL_ERROR and
leaves an error message in the interpreter's result object if interp is not NULL. If the index is out of range, that is, index is negative or greater than or equal to the numberof elements in the list, Tcl_ListObjIndex stores a NULL in
objPtrPtr and returns TCL_OK. Otherwise it returns TCL_OK
after storing the element's object pointer. The reference count for the list element is not incremented; the caller must do that if it needs to retain a pointer to the element.Tcl_ListObjReplace replaces zero or more elements of the
list referenced by listPtr with the objc objects in the array referenced by objv. If listPtr does not point to alist object, Tcl_ListObjReplace will attempt to convert it
to one; if the conversion fails, it returns TCL_ERROR and
leaves an error message in the interpreter's result objectif interp is not NULL. Otherwise, it returns TCL_OK after
replacing the objects. If objv is NULL, no new elements are added. If the argument first is zero or negative, it refers to the first element. If first is greater than or equal to the number of elements in the list, then no elements are deleted; the new elements are appended to the list. count gives the number of elements to replace. If count is zero or negative then no elements are deleted; the new elements are simply inserted before the one designated by first.Tcl_ListObjReplace invalidates listPtr's old string
representation. The reference counts of any elements inserted from objv are incremented since the resulting list now refers to them. Similarly, the reference counts for any replaced objects are decremented.Because Tcl_ListObjReplace combines both element insertion
and deletion, it can be used to implement a number of list operations. For example, the following code inserts the objc objects referenced by the array of object pointers objv just before the element index of the list referenced by Tcl Last change: 8.0 5Tcl Library Procedures Tcl_ListObj(3TCL)
listPtr:result = Tcl_ListObjReplace(interp, listPtr, index, 0, objc, objv);
Similarly, the following code appends the objc objects referenced by the array objv to the end of the list listPtr:result = Tcl_ListObjLength(interp, listPtr, &length);
if (result == TCL_OK) {
result = Tcl_ListObjReplace(interp, listPtr, length, 0, objc, objv);
} The count list elements starting at first can be deleted bysimply calling Tcl_ListObjReplace with a NULL objvPtr:
result = Tcl_ListObjReplace(interp, listPtr, first, count, 0, NULL);
SEE ALSO
Tcl_NewObj, Tcl_DecrRefCount, Tcl_IncrRefCount,
Tcl_GetObjResult
KEYWORDS append, index, insert, internal representation, length, list, list object, list type, object, object type, replace, string representationATTRIBUTES
See attributes(5) for descriptions of the following attri-
butes:_______________________________________
| ATTRIBUTE TYPE | ATTRIBUTE VALUE|
|____________________|__________________|_
| Availability | runtime/tcl-8 |
|____________________|__________________|_
| Interface Stability| Uncommitted ||____________________|_________________|
NOTES Source for Tcl is available on http://opensolaris.org. Tcl Last change: 8.0 6