/* >>>> Generated by mkmark.rkt from mzmarksrc.c <<<< */

static int mark_validate_clearing_SIZE(void *p, struct NewGC *gc) {
#ifndef GC_NO_SIZE_NEEDED_FROM_PROCS
  gcBYTES_TO_WORDS(sizeof(Validate_Clearing));
#else
  return 0;
#endif
}

static int mark_validate_clearing_MARK(void *p, struct NewGC *gc) {
#ifndef GC_NO_MARK_PROCEDURE_NEEDED
  Validate_Clearing *vc = (Validate_Clearing *)p;
  
  gcMARK2(vc->stack, gc);
  gcMARK2(vc->ncstack, gc);

# ifdef GC_NO_SIZE_NEEDED_FROM_PROCS
  return 0;
# else
  return
  gcBYTES_TO_WORDS(sizeof(Validate_Clearing));
# endif
#endif
}

static int mark_validate_clearing_FIXUP(void *p, struct NewGC *gc) {
#ifndef GC_NO_FIXUP_PROCEDURE_NEEDED
  Validate_Clearing *vc = (Validate_Clearing *)p;
  
  gcFIXUP2(vc->stack, gc);
  gcFIXUP2(vc->ncstack, gc);

# ifdef GC_NO_SIZE_NEEDED_FROM_PROCS
  return 0;
# else
  return
  gcBYTES_TO_WORDS(sizeof(Validate_Clearing));
# endif
#endif
}

#define mark_validate_clearing_IS_ATOMIC 0
#define mark_validate_clearing_IS_CONST_SIZE 1


