diff options
| author | griffin <briang42@easystreet.net> | 2022-10-11 03:49:20 (GMT) |
|---|---|---|
| committer | griffin <briang42@easystreet.net> | 2022-10-11 03:49:20 (GMT) |
| commit | 48ae5e307eac7d511835a8745094a296116c48d8 (patch) | |
| tree | 78c09eee656d02d6a9f166f94bb74dd56c622549 /generic/tcl.decls | |
| parent | 80303ffb39c4b720448ff14a21ff4c061698f702 (diff) | |
| download | tcl-48ae5e307eac7d511835a8745094a296116c48d8.zip tcl-48ae5e307eac7d511835a8745094a296116c48d8.tar.gz tcl-48ae5e307eac7d511835a8745094a296116c48d8.tar.bz2 | |
Modify AbstractList functions to include interp for error reporting. Other various improvements.
Diffstat (limited to 'generic/tcl.decls')
| -rw-r--r-- | generic/tcl.decls | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/generic/tcl.decls b/generic/tcl.decls index 6cc964b..646eddd 100644 --- a/generic/tcl.decls +++ b/generic/tcl.decls @@ -2547,13 +2547,13 @@ declare 684 { Tcl_WideInt Tcl_AbstractListObjLength(Tcl_Obj *abstractListPtr) } declare 685 { - int Tcl_AbstractListObjIndex(Tcl_Obj *abstractListPtr, Tcl_WideInt index, Tcl_Obj **elemObjPtr) + int Tcl_AbstractListObjIndex(Tcl_Interp *interp, Tcl_Obj *abstractListPtr, Tcl_WideInt index, Tcl_Obj **elemObjPtr) } declare 686 { - Tcl_Obj *Tcl_AbstractListObjRange(Tcl_Obj *abstractListPtr, Tcl_WideInt fromIdx, Tcl_WideInt toIdx) + int Tcl_AbstractListObjRange(Tcl_Interp *interp, Tcl_Obj *abstractListPtr, Tcl_WideInt fromIdx, Tcl_WideInt toIdx, Tcl_Obj **newObjPtr) } declare 687 { - Tcl_Obj *Tcl_AbstractListObjReverse(Tcl_Obj *abstractListPtr) + int Tcl_AbstractListObjReverse(Tcl_Interp *interp, Tcl_Obj *abstractListPtr, Tcl_Obj **newObjPtr) } declare 688 { int Tcl_AbstractListObjGetElements(Tcl_Interp *interp, Tcl_Obj *objPtr, int *objcPtr, Tcl_Obj ***objvPtr) @@ -2561,6 +2561,9 @@ declare 688 { declare 689 { Tcl_Obj *Tcl_AbstractListObjCopy(Tcl_Interp *interp, Tcl_Obj *listPtr) } +declare 690 { + void *Tcl_AbstractListGetConcreteRep(Tcl_Obj *objPtr) +} # ----- BASELINE -- FOR -- 8.7.0 ----- # |