Update debug.tcl with proc build_code(), do_cmd()