Я думаю, нам нужно немного подробнее, прежде чем мы сможем помочь.
Итак, мы говорим о графике, если да, то какого типа? Простейшим был бы неориентированный граф без весов ребер, но так ли это?
Есть ли у вас структура данных для графика, если да, то что это?
Наконец, почему ты изобретаешь колесо? Tcllib имеет пакет struct :: graph, который реализует поиск в ширину, см. Команду walk . Можете ли вы использовать это или алгоритмы в пакете struct :: graph :: op, чтобы делать то, что вы хотите.