mirror of
https://github.com/encounter/bdwgc.git
synced 2026-03-30 10:57:55 -07:00
Ivan Maidanski
a1103330ed
* tests/staticrootslib.c: Do not include stdio.h (not needed). * tests/staticrootslib.c (root, root_nz): New static variables. * tests/staticrootstest.c (root_nz): Likewise. * tests/staticrootslib.c (libsrl_getpelem): New exported function (exported as "libsrl_getpelem2" if STATICROOTSLIB2). * tests/staticrootslib.c (libsrl_mktree, libsrl_init): Do not define if STATICROOTSLIB2. * tests/staticrootslib.c (libsrl_init): Do not call GC_INIT if STATICROOTSLIB_INIT_IN_MAIN defined. * tests/staticrootstest.c (libsrl_getpelem, libsrl_getpelem2): Declare imported function. * tests/staticrootstest.c (main): Call GC_INIT if STATICROOTSLIB_INIT_IN_MAIN defined; set *libsrl_getpelem2() (only if STATICROOTSLIB2 defined), *libsrl_getpelem() and root_nz[] elements (similar to that of root[]).
68 lines
1.6 KiB
C
68 lines
1.6 KiB
C
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#ifndef GC_DEBUG
|
|
# define GC_DEBUG
|
|
#endif
|
|
|
|
#include "gc.h"
|
|
#include "gc_backptr.h"
|
|
|
|
#ifndef GC_TEST_IMPORT_API
|
|
# define GC_TEST_IMPORT_API extern
|
|
#endif
|
|
|
|
/* Should match that in staticrootslib.c. */
|
|
struct treenode {
|
|
struct treenode *x;
|
|
struct treenode *y;
|
|
};
|
|
|
|
struct treenode *root[10] = { NULL };
|
|
|
|
/* Same as "root" variable but initialized to some non-zero value (to */
|
|
/* be placed to .data section instead of .bss). */
|
|
struct treenode *root_nz[10] = { (void *)(GC_word)1 };
|
|
|
|
static char *staticroot = 0;
|
|
|
|
GC_TEST_IMPORT_API struct treenode * libsrl_mktree(int i);
|
|
GC_TEST_IMPORT_API void * libsrl_init(void);
|
|
GC_TEST_IMPORT_API struct treenode ** libsrl_getpelem(int i, int j);
|
|
|
|
GC_TEST_IMPORT_API struct treenode ** libsrl_getpelem2(int i, int j);
|
|
|
|
int main(void)
|
|
{
|
|
int i, j;
|
|
|
|
# ifdef STATICROOTSLIB_INIT_IN_MAIN
|
|
GC_INIT();
|
|
# endif
|
|
staticroot = libsrl_init();
|
|
if (NULL == staticroot) {
|
|
fprintf(stderr, "GC_malloc returned NULL\n");
|
|
return 2;
|
|
}
|
|
memset(staticroot, 0x42, sizeof(struct treenode));
|
|
GC_gcollect();
|
|
for (j = 0; j < 4; j++) {
|
|
for (i = 0; i < (int)(sizeof(root) / sizeof(root[0])); ++i) {
|
|
# ifdef STATICROOTSLIB2
|
|
*libsrl_getpelem2(i, j) = libsrl_mktree(12);
|
|
# endif
|
|
*libsrl_getpelem(i, j) = libsrl_mktree(12);
|
|
((j & 1) != 0 ? root_nz : root)[i] = libsrl_mktree(12);
|
|
GC_gcollect();
|
|
}
|
|
for (i = 0; i < (int)sizeof(struct treenode); ++i) {
|
|
if (staticroot[i] != 0x42) {
|
|
fprintf(stderr, "Memory check failed\n");
|
|
return -1;
|
|
}
|
|
}
|
|
}
|
|
return 0;
|
|
}
|