proc history args {}
proc test {} {
    set a {b c}
    set x [dict update a b bb {
	set bb 1
    }]
}
proc test0 {} {
    set x [set y 1]
}

set tcl_traceExec 3

# [test0] produces the correct levels, as reference:
#  ...
#  2:  1 (6) done => return code=0, result="1"
#  ...

# [test] produces (pre-patch) wrong stack levels: note the '2'
#  ...
#  2:  2 (xx) done => return code=0, result="1"
#  ...
