private Leaf GetCharCategory()
{
// Assert: chr == '[', next is ':'
int start;
string name;
PredicateLeaf rslt;
scan(); // read past '['
scan(); // read past ':'
start = index - 1;
while (Char.IsLetter(chr)) // Need revision for any ident ...
scan();
name = pat.Substring(start, index - start - 1);
if (!GetCharCategory(name, out rslt))
Error(76, start, name.Length, name);
checkAndScan(':');
checkAndScan(']');
return rslt;
}
AAST.ReParser::GetCharCategory ( string name, |