gbdk-releases/sdcc/support/regression/tests/bp.c
2015-01-10 16:25:09 +01:00

59 lines
1.1 KiB
C

/* Base pointer tests, specifically for the z80.
*/
#include <testfwk.h>
#include <string.h>
int
verifyBlock(char *p, char val, int len)
{
while (len--) {
if (*p++ != val) {
return 0;
}
}
return 1;
}
int
spoil(int a)
{
return a;
}
#ifndef SDCC_mcs51
#define ABOVE_MEM_SIZE 400
#define ABOVE_MEM_TEST_SIZE 17
#define BELOW_MEM_SIZE 200
#define BELOW_MEM_TEST_SIZE 74
#else
// test mcs51 with much less memory
#define ABOVE_MEM_SIZE 30
#define ABOVE_MEM_TEST_SIZE 17
#define BELOW_MEM_SIZE 20
#define BELOW_MEM_TEST_SIZE 7
#endif
void
testBP(void)
{
char above[ABOVE_MEM_SIZE];
int f;
char below[BELOW_MEM_SIZE];
memset(above, ABOVE_MEM_TEST_SIZE, sizeof(above));
memset(below, BELOW_MEM_TEST_SIZE, sizeof(below));
ASSERT(verifyBlock(above, ABOVE_MEM_TEST_SIZE, sizeof(above)));
ASSERT(verifyBlock(below, BELOW_MEM_TEST_SIZE, sizeof(below)));
f = spoil(-5);
spoil(f);
ASSERT(verifyBlock(above, ABOVE_MEM_TEST_SIZE, sizeof(above)));
ASSERT(verifyBlock(below, BELOW_MEM_TEST_SIZE, sizeof(below)));
}