gforth/extend.fs - diff

Return to extend.fs CVS log

Up to [gforth] / gforth

version 1.40, 2000/08/09 20:04:05	version 1.43, 2000/09/10 19:50:33
Line 25 decimal	Line 25 decimal

\ .( 12may93jaw	\ .( 12may93jaw

: .( ( "ccc<paren>" -- ) \ core-ext dot-paren	: .( ( compilation,interpretation "ccc<paren>" -- ) \ core-ext dot-paren
\G Parse a string @i{ccc} delimited by a @code{)} (right	\G Compilation and interpretation semantics: Parse a string @i{ccc}
\G parenthesis). Display the string. This is often used to display	\G delimited by a @code{)} (right parenthesis). Display the
\G progress information during compilation; see examples below.	\G string. This is often used to display progress information during
	\G compilation; see examples below.
[char] ) parse type ; immediate	[char] ) parse type ; immediate

\ VALUE 2>R 2R> 2R@ 17may93jaw	\ VALUE 2>R 2R> 2R@ 17may93jaw
Line 145 decimal	Line 146 decimal
>in @	>in @
loadfile @	loadfile @
if	if
loadfile @ file-position throw #TIB @ 1+ 0 d- \ !! bug for CRLF and EOF	loadfile @ file-position throw
	[IFDEF] #fill-bytes #fill-bytes @ [ELSE] #tib @ 1+ [THEN] 0 d-
else	else
blk @	blk @
linestart @	linestart @