version 1.6, 2000/11/21 18:43:29
|
version 1.8, 2001/07/09 04:01:53
|
Line 754 EndLine ([\r][\n]|[\n])
|
Line 754 EndLine ([\r][\n]|[\n])
|
dosend=2; |
dosend=2; |
} |
} |
|
|
[Ss][Tt][Rr] { LLDBUG_PR1("[STR]"); send("\" str="); dosend=1; } |
[Ss][Tt][Rr] { LLDBUG_PR1("[STR]"); send("\" str=\""); dosend=1; } |
[Ee][Vv][Aa][Ll] | |
[Ee][Vv][Aa][Ll] | |
[Ee][Vv][Aa][Ll][Uu][Aa][Tt][Ee] { LLDBUG_PR1("[EVAL]");send("\" eval="); dosend=1;} |
[Ee][Vv][Aa][Ll][Uu][Aa][Tt][Ee] { LLDBUG_PR1("[EVAL]");send("\" eval="); dosend=1;} |
[Uu][Nn][Ii][Tt] | |
[Uu][Nn][Ii][Tt] | |
Line 837 EndLine ([\r][\n]|[\n])
|
Line 837 EndLine ([\r][\n]|[\n])
|
<S_VARIABLE,S_TRUE_FALSE_STMT,S_MAP,S_LET>{ |
<S_VARIABLE,S_TRUE_FALSE_STMT,S_MAP,S_LET>{ |
[\"] { LLDBUG_PR1("[TF,V,LET,MAP str\" ]"); |
[\"] { LLDBUG_PR1("[TF,V,LET,MAP str\" ]"); |
Current_char_p = String_buf; |
Current_char_p = String_buf; |
send("\""); |
send("'"); |
yy_push_state(S_STRING); |
yy_push_state(S_STRING); |
} |
} |
} |
} |
Line 870 EndLine ([\r][\n]|[\n])
|
Line 870 EndLine ([\r][\n]|[\n])
|
end_delayed(); |
end_delayed(); |
send("&format("); |
send("&format("); |
flush_delayed(); |
flush_delayed(); |
send(",\"%s\")",yytext+1); |
send(",'%s')",yytext+1); |
} |
} |
<S_ANSWER>[:]{Number}+[EeFf] { |
<S_ANSWER>[:]{Number}+[EeFf] { |
if (dosend) send("\" format=\"%s",yytext+1); |
if (dosend) send("\" format=\"%s",yytext+1); |
Line 931 EndLine ([\r][\n]|[\n])
|
Line 931 EndLine ([\r][\n]|[\n])
|
[\\][\"] { /**Current_char_p++ = '"';*/ send("\\\""); } |
[\\][\"] { /**Current_char_p++ = '"';*/ send("\\\""); } |
[\\]{Space}*[\n] { LLDBUG_PR2("[\\CR continue in S_STRING](%s)",yytext); /* continuation on next line */ } |
[\\]{Space}*[\n] { LLDBUG_PR2("[\\CR continue in S_STRING](%s)",yytext); /* continuation on next line */ } |
[\"] { /* end of a string constant -- */ |
[\"] { /* end of a string constant -- */ |
send("\""); |
send("'"); |
yy_pop_state(); |
yy_pop_state(); |
} |
} |
{EndLine} { /* check for termination of string constant */ |
{EndLine} { /* check for termination of string constant */ |