Add support for exclamation point.

git-svn-id: http://root.cern.ch/svn/root/trunk@47792 27541ba8-7e3a-0410-8455-c3a389f83636
This commit is contained in:
Vassil Vassilev 2012-12-03 16:42:06 +00:00
parent e5a6058db4
commit 86243e4b95
2 changed files with 5 additions and 2 deletions

View File

@ -29,7 +29,8 @@ namespace cling {
char C = *curPos++;
switch (C) {
case '[': case ']': case '(': case ')': case '{': case '}': case '"':
case '\'': case '\\': case ',': case '.': // INTENTIONAL FALL THROUGHs
case '\'': case '\\': case ',': case '.': case '!':
// INTENTIONAL FALL THROUGHs
return LexPunctuator(C, Tok);
case '/':
@ -92,9 +93,10 @@ namespace cling {
case '\'' : Tok.setKind(tok::apostrophe); break;
case ',' : Tok.setKind(tok::comma); break;
case '.' : Tok.setKind(tok::dot); break;
case '!' : Tok.setKind(tok::excl_mark); break;
case '/' : Tok.setKind(tok::slash); break;
case '\\' : Tok.setKind(tok::backslash); break;
case '\0' : Tok.setKind(tok::eof); Tok.setLength(0); break; // if static call
case '\0' : Tok.setKind(tok::eof); Tok.setLength(0); break;// if static call
default: Tok.setLength(0); break;
}
}

View File

@ -25,6 +25,7 @@ namespace cling {
apostrophe, // "'"
comma, // ","
dot, // "."
excl_mark, // "!"
slash, // "/"
backslash, // "\"
ident, // (a-zA-Z)[(0-9a-zA-Z)*]