Subversion Repositories openrisc

/* { dg-add-shlib "staticrootslib.c" } */
 
#include <stdio.h>
 
#ifndef GC_DEBUG
# define GC_DEBUG
#endif
 
#include "gc.h"
#include "gc_backptr.h"
 
struct treenode {
    struct treenode *x;
    struct treenode *y;
} * root[10];
 
static char *staticroot = 0;
 
extern struct treenode * libsrl_mktree(int i);
extern void * libsrl_init(void);
extern void * libsrl_collect (void);
 
int main(void)
{
  int i;
  staticroot = libsrl_init();
  for (i = 0; i < sizeof(struct treenode); ++i) {
    staticroot[i] = 0x42;
  }
  libsrl_collect();
  for (i = 0; i < 10; ++i) {
    root[i] = libsrl_mktree(12);
    libsrl_collect();
  }
  for (i = 0; i < sizeof(struct treenode); ++i) {
    if (staticroot[i] != 0x42)
      return -1;
  }
  for (i = 0; i < 10; ++i) {
    root[i] = libsrl_mktree(12);
    libsrl_collect();
  }
  for (i = 0; i < sizeof(struct treenode); ++i) {
    if (staticroot[i] != 0x42)
      return -1;
  }
  return 0;
}