mirror of https://github.com/ctm/syn68k.git
69 lines
1.5 KiB
C
69 lines
1.5 KiB
C
#include "testqsort.h"
|
|
#include "callemulator.h"
|
|
#include "syn68k_public.h"
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
|
|
#define ARRAY_SIZE 103
|
|
|
|
#if defined(mc68000)
|
|
static int emulator_array[ARRAY_SIZE], real_array[ARRAY_SIZE];
|
|
|
|
/* qsort helper function. */
|
|
static int
|
|
compare_ints (const void *n1, const void *n2)
|
|
{
|
|
return *(const int *)n1 - *(const int *)n2;
|
|
}
|
|
#endif
|
|
|
|
#ifdef USE_STUB
|
|
static void
|
|
stub ()
|
|
{
|
|
qsort (emulator_array, sizeof emulator_array / sizeof emulator_array[0],
|
|
sizeof emulator_array[0], compare_ints);
|
|
}
|
|
#endif
|
|
|
|
|
|
void
|
|
test_qsort ()
|
|
{
|
|
#ifndef mc68000
|
|
fputs ("You can't test qsort on a non-68000.\n", stderr);
|
|
#else
|
|
int i;
|
|
|
|
|
|
/* Randomize the array. */
|
|
for (i = 0; i < sizeof real_array / sizeof real_array[0]; i++)
|
|
emulator_array[i] = real_array[i] = rand ();
|
|
|
|
/* Sort it on the real CPU. */
|
|
qsort (real_array, sizeof real_array / sizeof real_array[0],
|
|
sizeof real_array[0], compare_ints);
|
|
|
|
#ifndef USE_STUB
|
|
/* Sort it under the emulator. */
|
|
call_emulator ((int (*)())qsort, emulator_array,
|
|
sizeof emulator_array / sizeof emulator_array[0],
|
|
sizeof emulator_array[0], compare_ints);
|
|
#else
|
|
{
|
|
char stack[8192];
|
|
EM_A7 = EM_A6 = &stack[6000];
|
|
CALL_EMULATOR ((syn68k_addr_t) stub);
|
|
}
|
|
#endif
|
|
|
|
|
|
/* Compare the results. */
|
|
if (memcmp (real_array, emulator_array, sizeof real_array))
|
|
fprintf (stderr, "test_qsort failed; emulator gets different "
|
|
"results than the real 680x0.\n");
|
|
else
|
|
fprintf (stderr, "test_qsort succeeded.\n");
|
|
#endif /* mc68000 */
|
|
}
|