gforth/vmgen-ex/profile.c - diff

Return to profile.c CVS log

Up to [gforth] / gforth / vmgen-ex

version 1.4, 2002/06/02 17:02:56	version 1.6, 2003/03/09 15:17:09
Line 1	Line 1
/* VM profiling support stuff	/* VM profiling support stuff

Copyright (C) 2001 Free Software Foundation, Inc.	Copyright (C) 2001,2003 Free Software Foundation, Inc.

This file is part of Gforth.	This file is part of Gforth.

Line 70 block_count block_insert(Inst ip)	Line 70 block_count block_insert(Inst ip)
new->fallthrough = NULL;	new->fallthrough = NULL;
new->ip = ip;	new->ip = ip;
new->count = (long_long)0;	new->count = (long_long)0;
new->insts = malloc(0);	new->insts = malloc(1);
assert(new->insts != NULL);	assert(new->insts != NULL);
new->ninsts = 0;	new->ninsts = 0;
blocks[hash(ip)] = new;	blocks[hash(ip)] = new;