gforth/engine/profile.c - diff

Return to profile.c CVS log

Up to [gforth] / gforth / engine

version 1.10, 2003/08/25 14:17:52	version 1.13, 2003/11/02 22:15:29
Line 128 void postprocess(void)	Line 128 void postprocess(void)
}	}
}	}

#if 0	#if 1
/* full basic blocks only */	/* full basic blocks only */
void print_block(FILE file, block_count b)	void print_block(FILE file, block_count b)
{	{
Line 158 void print_block(FILE *file, block_count	Line 158 void print_block(FILE *file, block_count
{	{
size_t i,j,k;	size_t i,j,k;

for (i=2; i<12; i++)	for (i=1; i<2; i++)
for (j=0; i+j<=b->ninsts; j++) {	for (j=0; i+j<=b->ninsts; j++) {
fprintf(file,"%14lld\t",b->count);	fprintf(file,"%14lld\t",b->count);
for (k=j; k<i+j; k++)	for (k=j; k<i+j; k++)