#5 DList.Contains exception when size=0

[Anonymous]

DList.Contains results in exception if DList.size=0.

Solution:

Check for atEnd before Compare

while (compare(get(i),obj) <> 0) and (not atEnd(i)) do

Should be:

while (not atEnd(i)) and (compare(get(i),obj) <> 0) do