1 #ifndef _newgen_text_included
2 #define _newgen_text_included
3 #define _gen_text_start 85
10 #define sentence_domain (_gen_text_start+0)
11 #if !defined(_newgen_sentence_domain_defined_)
12 #define _newgen_sentence_domain_defined_
13 #define SENTENCE_NEWGEN_DOMAIN (sentence_domain)
14 #define sentence_NEWGEN_DOMAIN (sentence_domain)
18 #define text_domain (_gen_text_start+1)
19 #if !defined(_newgen_text_domain_defined_)
20 #define _newgen_text_domain_defined_
21 #define TEXT_NEWGEN_DOMAIN (text_domain)
22 #define text_NEWGEN_DOMAIN (text_domain)
26 #define unformatted_domain (_gen_text_start+2)
27 #if !defined(_newgen_unformatted_domain_defined_)
28 #define _newgen_unformatted_domain_defined_
29 #define UNFORMATTED_NEWGEN_DOMAIN (unformatted_domain)
30 #define unformatted_NEWGEN_DOMAIN (unformatted_domain)
36 #define SENTENCE(x) ((sentence)((x).p))
37 #define sentence_CAST(x) SENTENCE(x)
38 #define SENTENCE_CAST(x) SENTENCE(x)
39 #define SENTENCE_(x) ((x).e)
40 #define SENTENCE_TYPE sentence
41 #define sentence_TYPE sentence
42 #define sentence_undefined ((sentence)gen_chunk_undefined)
43 #define sentence_undefined_p(x) ((x)==sentence_undefined)
50 #define gen_SENTENCE_cons gen_sentence_cons
74 #define sentence_domain_number(x) ((x)->_type_)
75 #define sentence_tag(x) ((x)->_sentence_tag__)
76 #define sentence_formatted_p(x) (sentence_tag(x)==is_sentence_formatted)
77 #define sentence_formatted_(x) sentence_formatted(x)
78 #define sentence_formatted(x) ((x)->_sentence_union_._sentence_formatted_)
79 #define sentence_unformatted_p(x) (sentence_tag(x)==is_sentence_unformatted)
80 #define sentence_unformatted_(x) sentence_unformatted(x)
81 #define sentence_unformatted(x) ((x)->_sentence_union_._sentence_unformatted_)
85 #define TEXT(x) ((text)((x).p))
86 #define text_CAST(x) TEXT(x)
87 #define TEXT_CAST(x) TEXT(x)
88 #define TEXT_(x) ((x).e)
89 #define TEXT_TYPE text
90 #define text_TYPE text
91 #define text_undefined ((text)gen_chunk_undefined)
92 #define text_undefined_p(x) ((x)==text_undefined)
99 #define gen_TEXT_cons gen_text_cons
112 #define text_domain_number(x) ((x)->_type_)
113 #define text_sentences(x) ((x)->_text_holder_)
117 #define UNFORMATTED(x) ((unformatted)((x).p))
118 #define unformatted_CAST(x) UNFORMATTED(x)
119 #define UNFORMATTED_CAST(x) UNFORMATTED(x)
120 #define UNFORMATTED_(x) ((x).e)
121 #define UNFORMATTED_TYPE unformatted
122 #define unformatted_TYPE unformatted
123 #define unformatted_undefined ((unformatted)gen_chunk_undefined)
124 #define unformatted_undefined_p(x) ((x)==unformatted_undefined)
131 #define gen_UNFORMATTED_cons gen_unformatted_cons
147 #define unformatted_domain_number(x) ((x)->_type_)
148 #define unformatted_label_(x) unformatted_label(x)
149 #define unformatted_label(x) ((x)->_unformatted_label_)
150 #define unformatted_number_(x) unformatted_number(x)
151 #define unformatted_number(x) ((x)->_unformatted_number_)
152 #define unformatted_extra_margin_(x) unformatted_extra_margin(x)
153 #define unformatted_extra_margin(x) ((x)->_unformatted_extra_margin_)
154 #define unformatted_words_(x) unformatted_words(x)
155 #define unformatted_words(x) ((x)->_unformatted_words_)
159 sentence = formatted:string + unformatted:unformatted;\n\
160 text = sentences:sentence*;\n\
161 unformatted = label:string x number:int x extra_margin:int x words:string*;\n\
union _newgen_struct_sentence_::@81 _sentence_union_
enum sentence_utype _sentence_tag__
unformatted _sentence_unformatted_
formatted:string
string _sentence_formatted_
The structure used to build lists in NewGen.
unformatted copy_unformatted(unformatted)
UNFORMATTED.
bool unformatted_consistent_p(unformatted)
void sentence_assign_contents(sentence, sentence)
sentence make_sentence_unformatted(unformatted)
void unformatted_non_recursive_free(unformatted)
list gen_text_cons(text, list)
bool sentence_defined_p(sentence)
sentence read_sentence(FILE *)
void free_unformatted(unformatted)
string sentence_tag_as_string(enum sentence_utype)
struct _newgen_struct_text_ * text
list gen_unformatted_cons(unformatted, list)
void text_assign_contents(text, text)
unformatted read_unformatted(FILE *)
bool sentence_consistent_p(sentence)
void text_non_recursive_free(text)
void write_text(FILE *, text)
list gen_sentence_cons(sentence, list)
sentence copy_sentence(sentence)
SENTENCE.
unformatted check_unformatted(unformatted)
sentence make_sentence_formatted(string)
void free_sentence(sentence)
void write_unformatted(FILE *, unformatted)
sentence check_sentence(sentence)
bool text_defined_p(text)
void sentence_non_recursive_free(sentence)
void unformatted_assign_contents(unformatted, unformatted)
void write_sentence(FILE *, sentence)
struct _newgen_struct_unformatted_ * unformatted
bool unformatted_defined_p(unformatted)
unformatted make_unformatted(string, intptr_t, intptr_t, list)
struct _newgen_struct_sentence_ * sentence
bool text_consistent_p(text)
@ is_sentence_unformatted
sentence make_sentence(enum sentence_utype, void *)
text copy_text(text)
TEXT.