Evaluated proc addtroll str { lappend ::trolldb $str; . done }