Evaluated proc tc {c args} { return [^C][lzero $1 $c][args][^C] }