remove debugging support

This commit is contained in:
Vitor Santos Costa 2012-12-15 00:16:59 +00:00
parent 7811a697b8
commit 6e94d6b37e

View File

@ -3374,16 +3374,12 @@ compact_heap( USES_REGS1 )
ptr[0] = EndSpecials;
dest -= nofcells;
current = ptr;
fprintf(stderr,"%p B\n",current);
int i; for (i=0; i < nofcells;i++)
fprintf(stderr,"%p U\n",current+i);
/* process the functor on a separate cycle */
DEBUG_printf21("%p %ld\n", current-1, (long int)(nofcells+1));
continue;
} else {
DEBUG_printf20("%p 1\n", current);
}
fprintf(stderr,"%p U\n",current);
#ifdef DEBUG
found_marked++;
#endif /* DEBUG */
@ -3407,7 +3403,6 @@ compact_heap( USES_REGS1 )
if (in_garbage)
start_from[0] = in_garbage;
fprintf(stderr,"done\n");
#ifdef DEBUG
if (dest != start_from-1)
fprintf(GLOBAL_stderr,"%% Bad Dest (%lu): %p should be %p\n",