Public ReadOnly Property Ordering As LurchTableOrder

public LurchTableOrder Ordering {get;}

var test = new LurchTableTest<int, string>(LurchTableOrder.Access);
Assert.AreEqual(LurchTableOrder.Access, test.Ordering);
var sample = GetSample();
foreach (var item in sample)
    test.Add(item.Key, item.Value);

Array.Reverse(sample);
foreach (var item in sample)
    Assert.AreEqual(item.Value, test[item.Key]);

KeyValuePair<int, string> value;
foreach (var item in sample)
{
    Assert.IsTrue(test.TryDequeue(out value));
    Assert.AreEqual(item.Key, value.Key);
    Assert.AreEqual(item.Value, value.Value);
}

Assert.IsFalse(test.Peek(out value));
Assert.IsFalse(test.TryDequeue(out value));

Dim test As var = New LurchTableTest(Of Integer, String)(LurchTableOrder.Access)
Assert.AreEqual(LurchTableOrder.Access, test.Ordering)
Dim sample As var = GetSample()
For Each item As var In sample
    test.Add(item.Key, item.Value)
Next

Array.Reverse(sample)
For Each item As var In sample
    Assert.AreEqual(item.Value, test(item.Key))
Next

Dim value As KeyValuePair(Of Integer, String)
For Each item As var In sample
    Assert.IsTrue(test.TryDequeue(value))
    Assert.AreEqual(item.Key, value.Key)
    Assert.AreEqual(item.Value, value.Value)
Next

Assert.IsFalse(test.Peek(value))
Assert.IsFalse(test.TryDequeue(value))