gforth/prim - diff

Return to prim CVS log

Up to [gforth] / gforth

version 1.231, 2008/07/27 09:58:29	version 1.233, 2008/08/09 14:17:51
Line 1674 supported on your machine (take a look a	Line 1674 supported on your machine (take a look a
your machine has a separate instruction cache. In such cases,	your machine has a separate instruction cache. In such cases,
@code{flush-icache} does nothing instead of flushing the instruction	@code{flush-icache} does nothing instead of flushing the instruction
cache.""	cache.""
FLUSH_ICACHE(c_addr,u);	FLUSH_ICACHE((caddr_t)c_addr,u);

(bye) ( n -- ) gforth paren_bye	(bye) ( n -- ) gforth paren_bye
SUPER_END;	SUPER_END;
Line 2460 l! ( w c_addr -- ) gforth l_store	Line 2460 l! ( w c_addr -- ) gforth l_store

lib-error ( -- c_addr u ) gforth lib_error	lib-error ( -- c_addr u ) gforth lib_error
""Error message for last failed @code{open-lib} or @code{lib-sym}.""	""Error message for last failed @code{open-lib} or @code{lib-sym}.""
c_addr = lt_dlerror();	c_addr = (Char *)lt_dlerror();
u = (c_addr == NULL) ? 0 : strlen(c_addr);	u = (c_addr == NULL) ? 0 : strlen((char *)c_addr);

\+	\+
\g peephole	\g peephole