2 /* Copyright (C) 1989-2014 Free Software Foundation, Inc.
3 Written by James Clark (jjc@jclark.com)
5 This file is part of groff.
7 groff is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation, either version 3 of the License, or
10 (at your option) any later version.
12 groff is distributed in the hope that it will be useful, but WITHOUT ANY
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>. */
34 TOKEN_CHAR, // a normal printing character
36 TOKEN_EMPTY, // this is the initial value
39 TOKEN_HYPHEN_INDICATOR,
40 TOKEN_INTERRUPT, // \c
41 TOKEN_ITALIC_CORRECTION, // \/
44 TOKEN_MARK_INPUT, // \k -- `nm' is the name of the register
45 TOKEN_NEWLINE, // newline
51 TOKEN_SPACE, // ` ' -- ordinary space
52 TOKEN_SPECIAL, // a special character -- \' \` \- \(xx \[xxx]
53 TOKEN_SPREAD, // \p -- break and spread output line
54 TOKEN_STRETCHABLE_SPACE, // \~
55 TOKEN_UNSTRETCHABLE_SPACE, // `\ '
56 TOKEN_HORIZONTAL_SPACE, // \|, \^, \0, \h
58 TOKEN_TRANSPARENT, // \!
59 TOKEN_TRANSPARENT_DUMMY, // \)
60 TOKEN_ZERO_WIDTH_BREAK, // \:
61 TOKEN_EOF // end of file
67 void operator=(const token &);
72 int nspaces(); // 1 if space, 2 if double space, 0 otherwise
73 int space(); // is the current token a space?
74 int stretchable_space(); // is the current token a stretchable space?
75 int unstretchable_space(); // is the current token an unstretchable space?
76 int horizontal_space(); // is the current token a horizontal space?
77 int white_space(); // is the current token space or tab?
78 int special(); // is the current token a special character?
79 int newline(); // is the current token a newline?
80 int tab(); // is the current token a tab?
83 int delimiter(int warn = 0); // is it suitable for use as a delimiter?
85 int transparent_dummy();
90 int hyphen_indicator();
91 int zero_width_break();
92 int operator==(const token &); // need this for delimiters, and for conditions
93 int operator!=(const token &); // ditto
95 charinfo *get_char(int required = 0);
96 int add_to_node_list(node **);
100 const char *description();
102 friend void process_input_stack();
103 friend node *do_overstrike();
106 extern token tok; // the current token
108 extern symbol get_name(int required = 0);
109 extern symbol get_long_name(int required = 0);
110 extern charinfo *get_optional_char();
111 extern char *read_string();
112 extern void check_missing_character();
113 extern void skip_line();
114 extern void handle_initial_title();
123 extern void do_define_character(char_mode, const char * = 0);
126 extern void read_title_parts(node **part, hunits *part_width);
128 extern int get_number_rigidly(units *result, unsigned char si);
130 extern int get_number(units *result, unsigned char si);
131 extern int get_integer(int *result);
133 extern int get_number(units *result, unsigned char si, units prev_value);
134 extern int get_integer(int *result, int prev_value);
136 void interpolate_number_reg(symbol, int);
138 const char *asciify(int c);
140 inline int token::newline()
142 return type == TOKEN_NEWLINE;
145 inline int token::space()
147 return type == TOKEN_SPACE;
150 inline int token::stretchable_space()
152 return type == TOKEN_STRETCHABLE_SPACE;
155 inline int token::unstretchable_space()
157 return type == TOKEN_UNSTRETCHABLE_SPACE;
160 inline int token::horizontal_space()
162 return type == TOKEN_HORIZONTAL_SPACE;
165 inline int token::special()
167 return type == TOKEN_SPECIAL;
170 inline int token::nspaces()
172 if (type == TOKEN_SPACE)
178 inline int token::white_space()
180 return type == TOKEN_SPACE || type == TOKEN_TAB;
183 inline int token::transparent()
185 return type == TOKEN_TRANSPARENT;
188 inline int token::page_ejector()
190 return type == TOKEN_PAGE_EJECTOR;
193 inline unsigned char token::ch()
195 return type == TOKEN_CHAR ? c : 0;
198 inline int token::eof()
200 return type == TOKEN_EOF;
203 inline int token::dummy()
205 return type == TOKEN_DUMMY;
208 inline int token::transparent_dummy()
210 return type == TOKEN_TRANSPARENT_DUMMY;
213 inline int token::left_brace()
215 return type == TOKEN_LEFT_BRACE;
218 inline int token::right_brace()
220 return type == TOKEN_RIGHT_BRACE;
223 inline int token::tab()
225 return type == TOKEN_TAB;
228 inline int token::leader()
230 return type == TOKEN_LEADER;
233 inline int token::backspace()
235 return type == TOKEN_BACKSPACE;
238 inline int token::hyphen_indicator()
240 return type == TOKEN_HYPHEN_INDICATOR;
243 inline int token::zero_width_break()
245 return type == TOKEN_ZERO_WIDTH_BREAK;