20 ch==
'~' || ch==
'!' || ch==
'@' || ch==
'$' || ch==
'%' ||
21 ch==
'^' || ch==
'&' || ch==
'*' || ch==
'_' || ch==
'-' ||
22 ch==
'+' || ch==
'=' || ch==
'<' || ch==
'>' || ch==
'.' ||
64 if(isdigit(ch) || ch==
'.')
93 if(ch==
'0' || ch==
'1')
162 error() <<
"EOF within quoted symbol" <<
eom;
194 error() <<
"EOF within string literal" <<
eom;
216 case static_cast<char>(160):
258 error() <<
"unknown numeral token" <<
eom;
264 error() <<
"unexpected EOF in numeral token" <<
eom;
283 error() <<
"unexpected character `" << ch <<
'\'' <<
eom;
289 return token=END_OF_FILE;
tokent get_decimal_numeral()
static mstreamt & eom(mstreamt &m)
enum { NONE, END_OF_FILE, ERROR, STRING_LITERAL, NUMERAL, SYMBOL, OPEN, CLOSE } tokent
tokent get_string_literal()
static bool is_simple_symbol_character(char)
tokent get_quoted_symbol()
tokent get_simple_symbol()