@queue = (undex)x@adj_index;
$queue_head = 0;
$queue_tail = 0;