diff options
author | hobbs <hobbs> | 2001-07-03 23:39:24 (GMT) |
---|---|---|
committer | hobbs <hobbs> | 2001-07-03 23:39:24 (GMT) |
commit | 72849b19b3634415af9c5b82658cddc9ff8b86b8 (patch) | |
tree | dcaf29b97ef354eaf70143913d3e167f050a83d2 /ChangeLog | |
parent | b7c987b2bd964f508ecf3e92bbe4b3adeb5bba93 (diff) | |
download | tcl-72849b19b3634415af9c5b82658cddc9ff8b86b8.zip tcl-72849b19b3634415af9c5b82658cddc9ff8b86b8.tar.gz tcl-72849b19b3634415af9c5b82658cddc9ff8b86b8.tar.bz2 |
* tests/append.test:
* tests/appendComp.test: added tests for read trace triggering for
append and lappend.
Diffstat (limited to 'ChangeLog')
-rw-r--r-- | ChangeLog | 21 |
1 files changed, 21 insertions, 0 deletions
@@ -1,3 +1,24 @@ +2001-07-03 Jeff Hobbs <jeffh@ActiveState.com> + + * generic/tclVar.c (Tcl_GetVar2Ex): added ability to recognize + TCL_TRACE_READS flags to cause creation of part1 in TclLookupVar + to make sure newly created array will get read traces triggered + appropriately. This is called by Tcl_ObjGetVar2, Tcl_GetVar, and + Tcl_GetVar2. + (TclSetIndexedScalar, TclSetElementOfIndexedArray): added read + trace triggering for lappend case. + (Tcl_LappendObjCmd): pass TCL_TRACE_READS to Tcl_ObjGetVar2 to + trigger possible read traces for new arrays. + + * generic/tclExecute.c (TclExecuteByteCode): added TCL_TRACE_READS + flag to INST_LAPPEND(_ARRAY)_STK case to trigger read traces for + newly created arrays. Removed unnecessary #ifdef for + TCL_COMPILE_DEBUG in INST_LOAD_SCALAR1 case. + + * tests/append.test: + * tests/appendComp.test: added tests for read trace triggering for + append and lappend. + 2001-07-03 Mo DeJong <mdejong@redhat.com> * tests/clock.test (clock-2.5): Adjust test so that it passes |