gforth/engine/main.c - diff

Return to main.c CVS log

Up to [gforth] / gforth / engine

version 1.183, 2007/06/09 21:41:29	version 1.184, 2007/06/30 20:28:55
Line 1088 static void append_jump(void)	Line 1088 static void append_jump(void)
code_here += pi->restlength;	code_here += pi->restlength;
memcpy(code_here, goto_start, goto_len);	memcpy(code_here, goto_start, goto_len);
code_here += goto_len;	code_here += goto_len;
	#if defined(__alpha)
	{
	/* align code after jump */
	Cell alignment = 16;
	code_here = (Address)((((UCell)code_here)+(alignment-1))&~(alignment-1));
	}
	#endif
last_jump=0;	last_jump=0;
}	}
}	}