[xBuild] Support use of properties defined in Choose elements in project references

[mono.git] / eglib / test / slist.c

diff --git a/eglib/test/slist.c b/eglib/test/slist.c
index 41888911d93685b276827ef52808839d3ac43d3a..3f8360ecae9536cc9f3749543a442693071f3afa 100644 (file)
--- a/eglib/test/slist.c
+++ b/eglib/test/slist.c
@@ -3,14 +3,77 @@
 #include <glib.h>
 #include "test.h"
 
+
+RESULT
+test_slist_nth ()
+{
+       char *foo = "foo";
+       char *bar = "bar";
+       char *baz = "baz";
+       GSList *nth, *list;
+       list = g_slist_prepend (NULL, baz);
+       list = g_slist_prepend (list, bar);
+       list = g_slist_prepend (list, foo);
+
+       nth = g_slist_nth (list, 0);
+       if (nth->data != foo)
+               return FAILED ("nth failed. #0");
+
+       nth = g_slist_nth (list, 1);
+       if (nth->data != bar)
+               return FAILED ("nth failed. #1");
+       
+       nth = g_slist_nth (list, 2);
+       if (nth->data != baz)
+               return FAILED ("nth failed. #2");
+
+       nth = g_slist_nth (list, 3);
+       if (nth)
+               return FAILED ("nth failed. #3: %s", nth->data);
+
+       g_slist_free (list);
+       return OK;
+}
+
+RESULT
+test_slist_index ()
+{
+       int i;
+       char *foo = "foo";
+       char *bar = "bar";
+       char *baz = "baz";
+       GSList *list;
+       list = g_slist_prepend (NULL, baz);
+       list = g_slist_prepend (list, bar);
+       list = g_slist_prepend (list, foo);
+
+       i = g_slist_index (list, foo);
+       if (i != 0)
+               return FAILED ("index failed. #0: %d", i);
+
+       i = g_slist_index (list, bar);
+       if (i != 1)
+               return FAILED ("index failed. #1: %d", i);
+       
+       i = g_slist_index (list, baz);
+       if (i != 2)
+               return FAILED ("index failed. #2: %d", i);
+
+       g_slist_free (list);
+       return OK;
+}
+
 RESULT
 test_slist_append ()
 {
-       GSList *list = g_slist_prepend (NULL, "first");
+       GSList *foo;
+       GSList *list = g_slist_append (NULL, "first");
        if (g_slist_length (list) != 1)
-               return FAILED ("Prepend failed");
+               return FAILED ("append(null,...) failed");
 
-       g_slist_append (list, "second");
+       foo = g_slist_append (list, "second");
+       if (foo != list)
+               return FAILED ("changed list head on non-empty");
 
        if (g_slist_length (list) != 2)
                return FAILED ("Append failed");
@@ -56,6 +119,34 @@ test_slist_find ()
        return OK;
 }
 
+static gint
+find_custom (gconstpointer a, gconstpointer b)
+{
+       return(strcmp (a, b));
+}
+
+RESULT
+test_slist_find_custom ()
+{
+       GSList *list = NULL, *found;
+       char *foo = "foo";
+       char *bar = "bar";
+       char *baz = "baz";
+       
+       list = g_slist_prepend (list, baz);
+       list = g_slist_prepend (list, bar);
+       list = g_slist_prepend (list, foo);
+       
+       found = g_slist_find_custom (list, baz, find_custom);
+       
+       if (found == NULL)
+               return FAILED ("Find failed");
+       
+       g_slist_free (list);
+       
+       return OK;
+}
+
 RESULT
 test_slist_remove ()
 {
@@ -168,29 +259,33 @@ static int intcompare (gconstpointer p1, gconstpointer p2)
        return GPOINTER_TO_INT (p1) - GPOINTER_TO_INT (p2);
 }
 
-static gboolean verify_sort (GSList *list)
+static gboolean verify_sort (GSList *list, int len)
 {
-       list = g_slist_sort (list, intcompare);
-
        int prev = GPOINTER_TO_INT (list->data);
+       len--;
        for (list = list->next; list; list = list->next) {
                int curr = GPOINTER_TO_INT (list->data);
                if (prev > curr)
                        return FALSE;
                prev = curr;
+
+               if (len == 0)
+                       return FALSE;
+               len--;
        }
-       return TRUE;
+       return len == 0;
 }
 
 RESULT
 test_slist_sort ()
 {
-       int i = 0;
+       int i, j, mul;
        GSList *list = NULL;
 
        for (i = 0; i < N_ELEMS; ++i)
                list = g_slist_prepend (list, GINT_TO_POINTER (i));
-       if (!verify_sort (list))
+       list = g_slist_sort (list, intcompare);
+       if (!verify_sort (list, N_ELEMS))
                return FAILED ("decreasing list");
 
        g_slist_free (list);
@@ -198,20 +293,33 @@ test_slist_sort ()
        list = NULL;
        for (i = 0; i < N_ELEMS; ++i)
                list = g_slist_prepend (list, GINT_TO_POINTER (-i));
-       if (!verify_sort (list))
+       list = g_slist_sort (list, intcompare);
+       if (!verify_sort (list, N_ELEMS))
                return FAILED ("increasing list");
 
        g_slist_free (list);
 
+       list = g_slist_prepend (NULL, GINT_TO_POINTER (0));
+       for (i = 1; i < N_ELEMS; ++i) {
+               list = g_slist_prepend (list, GINT_TO_POINTER (-i));
+               list = g_slist_prepend (list, GINT_TO_POINTER (i));
+       }
+       list = g_slist_sort (list, intcompare);
+       if (!verify_sort (list, 2*N_ELEMS-1))
+               return FAILED ("alternating list");
+
+       g_slist_free (list);
+
        list = NULL;
-       int mul = 1;
-       for (i = 0; i < N_ELEMS; ++i) {
-               list = g_slist_prepend (list, GINT_TO_POINTER (mul * i));
+       mul = 1;
+       for (i = 1; i < N_ELEMS; ++i) {
                mul = -mul;
+               for (j = 0; j < i; ++j)
+                       list = g_slist_prepend (list, GINT_TO_POINTER (mul * j));
        }
-
-       if (!verify_sort (list))
-               return FAILED ("alternating list");
+       list = g_slist_sort (list, intcompare);
+       if (!verify_sort (list, (N_ELEMS*N_ELEMS - N_ELEMS)/2))
+               return FAILED ("wavering list");
 
        g_slist_free (list);
 
@@ -219,9 +327,12 @@ test_slist_sort ()
 }
 
 static Test slist_tests [] = {
+       {"nth", test_slist_nth},
+       {"index", test_slist_index},
        {"append", test_slist_append},
        {"concat", test_slist_concat},
        {"find", test_slist_find},
+       {"find_custom", test_slist_find_custom},
        {"remove", test_slist_remove},
        {"remove_link", test_slist_remove_link},
        {"insert_sorted", test_slist_insert_sorted},