gforth/ds2texi.fs - diff

Return to ds2texi.fs CVS log

Up to [gforth] / gforth

version 1.10, 1996/08/21 14:58:38	version 1.13, 1997/02/12 00:25:34
Line 26	Line 26
\ `documentation'. Each word resides there under its own name.	\ `documentation'. Each word resides there under its own name.

script? [IF]	script? [IF]
warnings off	warnings off
require search-order.fs	require extend.fs
require glocals.fs	require search-order.fs
require float.fs	require glocals.fs
require struct.fs	require float.fs
require debugging.fs	require struct.fs
	require debugging.fs
[THEN]	[THEN]

wordlist constant documentation	wordlist constant documentation
Line 123 create description-buffer 4096 chars all	Line 124 create description-buffer 4096 chars all
." @var{ " r@ doc-stack-effect 2@ type ." } "	." @var{ " r@ doc-stack-effect 2@ type ." } "
r@ doc-wordset 2@ type	r@ doc-wordset 2@ type
cr	cr
	." @cindex "
	." @code{" r@ doc-name 2@ typetexi ." }"
	cr
." @format" cr	." @format" cr
." @code{" r@ doc-name 2@ typetexi ." } "	." @code{" r@ doc-name 2@ typetexi ." } "
." @i{" r@ doc-stack-effect 2@ type ." } "	." @i{" r@ doc-stack-effect 2@ type ." } "
Line 217 create docline doclinelength chars allot	Line 221 create docline doclinelength chars allot
else	else
." undocumented: " wordname type cr	." undocumented: " wordname type cr
endif ;	endif ;

script? [IF]
require prims2x.fs
s" primitives.b" ' register-doc process-file
require crossdoc.fd
require doc.fd
[THEN]