Evaluated proc asc2hb_pair twolines { set lines [nlsplit $twolines]; set l1 [first $lines]; set l2 [second $lines]; }