Mercurial > octave-nkf
diff src/lex.l @ 3480:45742a3b1f7c
[project @ 2000-01-26 06:16:41 by jwe]
author | jwe |
---|---|
date | Wed, 26 Jan 2000 06:16:44 +0000 |
parents | 5b77cf82393c |
children | 8b1f46ac2b64 |
line wrap: on
line diff
--- a/src/lex.l Wed Jan 26 04:08:07 2000 +0000 +++ b/src/lex.l Wed Jan 26 06:16:44 2000 +0000 @@ -2050,11 +2050,22 @@ TOK_RETURN (plot_option_kw); } - int c = yyinput (); - unput (c); - bool next_tok_is_eq = (c == '='); - bool next_tok_is_dot = (c == '.'); - bool next_tok_is_paren = (c == '('); + int c1 = yyinput (); + + bool next_tok_is_dot = (c1 == '.'); + bool next_tok_is_paren = (c1 == '('); + + bool next_tok_is_eq = false; + if (c1 == '=') + { + int c2 = yyinput (); + unput (c2); + + if (c2 != '=') + next_tok_is_eq = true; + } + + unput (c1); // Make sure we put the return values of a function in the symbol // table that is local to the function.