Source position: lists.inc line 25
function vt_list_index(
list: Pvt_list;
index: LongInt
):Pvt_listnode;