Branch: Tag:

2018-12-10

2018-12-10 11:35:50 by Henrik Grubbström (Grubba) <grubba@grubba.org>

Testsuite: Added some tests of m_add() and m_delete() with multisets.

5897:   ]],-1)       + test_any([[multiset m = (<>); int e; int f; +  for (e = 0; e < 100;e++) { +  for (f = e; f < 100; f++) { +  m_add(m, f); +  } +  } +  for (e = 0; e < 100; e++) { +  f = -1; +  while (m_delete(m, e)) f++; +  if (f != e) return e; +  } +  return -1; + ]], -1) +  + test_any([[multiset m = (<>); int e; int f; +  for (e = 0; e < 100;e++) { +  for (f = e; f < 100; f++) { +  m_add(m, e); +  } +  } +  for (e = 0; e < 100; e++) { +  f = e; +  while (m_delete(m, e)) f++; +  if (f != 100) return e; +  } +  return -1; + ]], -1) +  +    test_any([[multiset m=(<>);int e;    mixed a;    a=allocate(1000);