|
|
1.1 root 1: /***************************************************************************
2: * This program is Copyright (C) 1986, 1987, 1988 by Jonathan Payne. JOVE *
3: * is provided to you without charge, and with no warranty. You may give *
4: * away copies of JOVE, including sources, provided that this notice is *
5: * included in all the files. *
6: ***************************************************************************/
7:
8: typedef struct word Word;
9: typedef struct table Table;
10:
11: struct word {
12: Word *wd_next;
13: char *wd_text;
14: };
15:
16: struct table {
17: Table *t_next;
18: Word *t_wordlist;
19: };
20:
21: extern Table *make_table();
22: extern Word *word_in_table();
23:
24: #define table_top(table) (table->t_wordlist)
25: #define next_word(w) (w->wd_next)
26: #define last_word_p(w) (w->wd_next == NIL)
27: #define word_text(w) (w->wd_text)
28: #define word_length(w) (strlen(word_text(w)))
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.