sclass Test_CompactLinkedHashSet {
  new LinkedHashSet a;
  new CompactLinkedHashSet b;

  int n = 1000, valueRange = 10;
  O makeEntry() { ret random(valueRange); }
  bool remove = true;
  
  run {
    repeat n {
      addToTwoCollections(a, b, makeEntry());
      if (remove) removeFromTwoCollections(a, b, makeEntry());
      print(n2(a) + " - " + takeFirst(10, a.iterator());
      assertEquals(asList(a.iterator()), asList(b.iterator());
      print("Size LinkedHashSet: " + n2(deepObjectSize(a))
        + ", size CompactLinkedHashSet: " + n2(deepObjectSize(b)));
    }
    
    b.clear();
    assertEquals(0, b.size());
  }
}

svoid test_CompactLinkedHashSet() {
  new Test_CompactLinkedHashSet().run();
}

Began life as a copy of #1031508