Annotation of gforth/glosgen.glo, revision 220.127.116.11
1.1 anton 1: \G comments should appear immediately above or below the definition of
2: the word it belongs to. The definition line should contain no more
3: than the definition, a stack comment and a \ comment after which
4: the wordset and pronounciation.
5: An isolated block of \G comments is placed at the beginning of the
6: glossary file.
8: A typical glossary session may look like:
9: NEWGLOS MAKEGLOS SOURCE1.STR MAKEGLOS SOURCE2.STR WRITEGLOS GLOS.GLO
11: BUILD-HLINE addr ---
12: Build header line for glossary entry.
14: GLOS-COMMENT? --- flag
15: Determine if line at HERE is glossary comment, if so.
16: allot it, else store into oldline.
18: INSERT-HEADER addr ---
19: Insert the header into the list at the alphabetically correct place.
21: MAKE-GLOSENTRY fid --- fid flag
22: Read lines from the file fid until \G line encountered.
23: Collect all adjacent \G lines and find header line.
24: then insert entry into list flag=0 if no entry found.
26: MAKEGLOS "name"
27: This command reads a source file and builds glossary info
28: for it in memory.
31: This command starts a fresh glossary.
34: Process the header information stored in OLDLINE
36: SCAN-WORD ---- addr len
37: Scan a word on oldline through pointer charptr
39: WRITE-GLOSENTRY addr fid ---
40: write the glossary entry at address addr to file fid.
42: WRITEGLOS "name"
43: This command writes the glossary info from memory to a file.
44: The glossary info may be collected from more source files.
47: \G is an alias for \, so it is a comment till end-of-line, but
48: it has a special meaning for the Glossary Generator.