cmodule2 TestManagedStringList > DynTestModule {
  class Test {
    PersistentManagedObjects_v1<ManagedStringList> pm = new(ManagedStringList.factory());
    ManagedStringList l = new(pm.mem);
    ListTester tester;
  
    run {
      pm.setUserData(l);
      tester = new ListTester(l, lambda1 rotate);
      tester.rotateAtLeastEvery = 1;
      tester.run();
    }
  
    LS rotate(LS _l) {
      print("Rotating. memSize=" + pm.mem.size() + ", free=" + pm.mem.freeList.totalFree);
      print("Free list: " + pm.mem.freeList.lengthStats());
      l.flush();
      pm.setUserData(l);
      pm.flush();
      S hex = print(intArrayToHex(takeFirst(40, pm.mem.mem)));
      pm = pm.rotate();
      S hex2 = print(intArrayToHex(takeFirst(40, pm.mem.mem)));
      assertEquals(hex, hex2);
      ret l = pm.getUserData();
    }
  }
  
  void test {
    new Test().run();
  }
}