Add very old versions (for history).
[opsoft_archive.git] / silentbob / silentbob-1.4.1 / gclib / unit_tests / elist_test.cxx
blobe4d51b64eb4c0d821667bc181f8e6d5d22e06c77
1 /*
2 * (c) Oleg Puchinin 2006
3 * graycardinalster@gmail.com
5 * < ? program elist_test ?>
6 */
8 #include <gclib/gclib.h>
9 #include <gclib/gclib_c.h>
10 #include <time.h>
12 int main (int argc, char ** argv)
14 EList * list;
15 int i;
16 char buf[255];
17 char *S;
19 list = new EList;
20 srand (time (NULL));
21 while (true) {
22 Drand_str (buf, 254);
23 for (i = 0; i < 1000; ++i)
24 list->add_tail (strdup (buf));
26 list->first ();
27 while ((S = list->get ()) && S) {
28 if (rand () % 1) {
29 free (S);
30 list->rm ();
32 if (! list->next ())
33 list->first ();
36 return EXIT_SUCCESS;