while и endless loop...

Vladimir 04.05.2005 13:01

Есть база данных с таблицей вида:
ID Refer
1 0
2 0
3 1
4 3
5 4
где поле Refer — ссылка на другой эл-т. т.е. 5->4->3->1.
При попытке с помощью while сделать поиск вида

$leaf[^table::sql{select * from tbl where Refer=$id}]
^while($leaf)
  ^leaf.menu{
    $leaf.name
  }
$leaf[^table::sql{select * from tbl where Refer=$leaf.id}]
}

выдает endless loop.
Может это можно сделать неким другим образом?

---