Commit 1f746936 by Richard Kenner

(yylex): Add support for <: :> <% %> digraphs.

From-SVN: r8982
parent 675ecbd7
......@@ -1879,6 +1879,7 @@ yylex ()
case '-':
case '&':
case '|':
case ':':
case '<':
case '>':
case '*':
......@@ -1956,8 +1957,28 @@ yylex ()
c = RSHIFT;
goto combine;
}
else if ((c == '-') && (c1 == '>'))
{ value = POINTSAT; goto done; }
else
switch (c)
{
case '-':
if (c1 == '>')
{ value = POINTSAT; goto done; }
break;
case ':':
if (c1 == '>')
{ value = ']'; goto done; }
break;
case '<':
if (c1 == '%')
{ value = '{'; goto done; }
if (c1 == ':')
{ value = '['; goto done; }
break;
case '%':
if (c1 == '>')
{ value = '}'; goto done; }
break;
}
ungetc (c1, finput);
token_buffer[1] = 0;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment