| \ The glossary entries are generated from data present in the wordlist |
\ The glossary entries are generated from data present in the wordlist |
| \ `documentation'. Each word resides there under its own name. |
\ `documentation'. Each word resides there under its own name. |
| |
|
| |
script? [IF] |
| |
warnings off |
| |
include search-order.fs |
| |
include struct.fs |
| |
include debugging.fs |
| |
[THEN] |
| |
|
| wordlist constant documentation |
wordlist constant documentation |
| |
|
| struct |
struct |
| docline swap process-line |
docline swap process-line |
| repeat |
repeat |
| drop rdrop ; |
drop rdrop ; |
| |
|
| |
script? [IF] |
| |
include prims2x.fs |
| |
s" primitives.b" ' register-doc process-file |
| |
s" gforth.ds" r/o open-file throw ds2texi bye |
| |
[THEN] |
