2 #include "TCharStream.hh"
3 #include "TCharStreamString.hh"
6 TLexerPull::pop(TCharStream& stream)
10 TChar ch = stream.next();
15 if (isUnicodeAlpha(stream.look()))
18 while (stream.more() && isUnicodeAlpha(stream.look()))
19 s.push_back(stream.next());
20 TToken res(TToken::CONTROL, s);
21 while (stream.more() && isUnicodeSpace(stream.look()))
26 return TToken(TToken::CONTROL, TString(1, stream.next()));
29 return TToken(TToken::INVALID_CHAR, TString(1, ch));
31 else return TToken(ch);
33 else return TToken(TToken::END_OF_BUFFER);