X-Git-Url: https://erislabs.net/gitweb/?a=blobdiff_plain;f=tests%2Ftest-rbtree_oset.c;h=2ecb81f4a5810690ebf4ab98c66b9eb4a95b8eb5;hb=8e74296348d2d5197a301ebf8c8b1e4342088ad3;hp=f6c3e69ef41ac931397f49595d150437bee85039;hpb=d96695ef5092764e7839ecc3644276f4c324ba6b;p=gnulib.git diff --git a/tests/test-rbtree_oset.c b/tests/test-rbtree_oset.c index f6c3e69ef..2ecb81f4a 100644 --- a/tests/test-rbtree_oset.c +++ b/tests/test-rbtree_oset.c @@ -1,5 +1,5 @@ /* Test of ordered set data type implementation. - Copyright (C) 2006 Free Software Foundation, Inc. + Copyright (C) 2006-2007 Free Software Foundation, Inc. Written by Bruno Haible , 2006. This program is free software; you can redistribute it and/or modify @@ -20,11 +20,14 @@ # include #endif +#include "gl_rbtree_oset.h" + +#include #include #include #include "gl_array_oset.h" -#include "gl_rbtree_oset.h" +#include "progname.h" extern void gl_rbtree_oset_check_invariants (gl_oset_t set); @@ -35,7 +38,16 @@ static const char *objects[30] = }; #define SIZEOF(array) (sizeof (array) / sizeof (array[0])) -#define ASSERT(condition) if (!(condition)) abort () +#define ASSERT(expr) \ + do \ + { \ + if (!(expr)) \ + { \ + fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__); \ + abort (); \ + } \ + } \ + while (0) #define RANDOM(n) (rand () % (n)) #define RANDOM_OBJECT() objects[RANDOM (SIZEOF (objects))] @@ -74,6 +86,8 @@ main (int argc, char *argv[]) { gl_oset_t set1, set2; + set_program_name (argv[0]); + /* Allow the user to provide a non-default random seed on the command line. */ if (argc > 1) srand (atoi (argv[1])); @@ -84,10 +98,10 @@ main (int argc, char *argv[]) unsigned int repeat; /* Create set1. */ - set1 = gl_oset_create_empty (GL_ARRAY_OSET, (gl_setelement_compar_fn) strcmp); + set1 = gl_oset_create_empty (GL_ARRAY_OSET, (gl_setelement_compar_fn) strcmp, NULL); /* Create set2. */ - set2 = gl_oset_create_empty (GL_RBTREE_OSET, (gl_setelement_compar_fn) strcmp); + set2 = gl_oset_create_empty (GL_RBTREE_OSET, (gl_setelement_compar_fn) strcmp, NULL); check_all (set1, set2);