Commit 1f746936 by Richard Kenner

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

From-SVN: r8982
parent 675ecbd7
...@@ -1879,6 +1879,7 @@ yylex () ...@@ -1879,6 +1879,7 @@ yylex ()
case '-': case '-':
case '&': case '&':
case '|': case '|':
case ':':
case '<': case '<':
case '>': case '>':
case '*': case '*':
...@@ -1956,8 +1957,28 @@ yylex () ...@@ -1956,8 +1957,28 @@ yylex ()
c = RSHIFT; c = RSHIFT;
goto combine; goto combine;
} }
else if ((c == '-') && (c1 == '>')) else
{ value = POINTSAT; goto done; } 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); ungetc (c1, finput);
token_buffer[1] = 0; 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