libs-base/Testing/test04.m
mccallum 9d4dc7a546 Update for new collection heirarchy.
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@1390 72102866-910b-0410-8b05-ffd578937521
1996-04-17 00:30:23 +00:00

47 lines
772 B
Objective-C

/* Test Heap class. */
#include <objects/objects.h>
#define N 20
#if (sun && __svr4__) || defined(__hpux) || defined(_SEQUENT_)
long lrand48();
#define random lrand48
#else
#if WIN32
#define random rand
#else
long random();
#endif
#endif
int main()
{
int i;
int s, s1, s2;
Heap* heap = [Heap new];
Array* array = [Array new];
for (i = 0; i < N; i++)
{
s = random ();
[heap addObject: [NSNumber numberWithInt: i]];
[array addObject: [NSNumber numberWithInt: i]];
}
[array sortContents];
for (i = 0; i < N; i++)
{
s1 = [heap removeFirstObject];
s2 = [array removeLastObject];
printf("(%d,%d) ", s1, s2);
assert (s1 != s2);
}
printf("\n");
[heap release];
[array release];
exit(0);
}