Mercurial > octave-nkf
comparison libinterp/parse-tree/lex.ll @ 16645:450c03932d6c classdef
don't push superclass and metaclass tokens twice
* lex.ll (metaclass and superclass patterns):
Use count_token_internal, not count_token.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Sun, 12 May 2013 21:47:57 -0400 |
parents | 856cb7cba231 |
children | e1c6ad54259f |
comparison
equal
deleted
inserted
replaced
16644:856cb7cba231 | 16645:450c03932d6c |
---|---|
741 | 741 |
742 if (id_tok >= 0) | 742 if (id_tok >= 0) |
743 { | 743 { |
744 curr_lexer->looking_for_object_index = true; | 744 curr_lexer->looking_for_object_index = true; |
745 | 745 |
746 return curr_lexer->count_token (id_tok); | 746 return curr_lexer->count_token_internal (id_tok); |
747 } | 747 } |
748 } | 748 } |
749 | 749 |
750 %{ | 750 %{ |
751 // Metaclass query | 751 // Metaclass query |
759 | 759 |
760 if (id_tok >= 0) | 760 if (id_tok >= 0) |
761 { | 761 { |
762 curr_lexer->looking_for_object_index = true; | 762 curr_lexer->looking_for_object_index = true; |
763 | 763 |
764 return curr_lexer->count_token (id_tok); | 764 return curr_lexer->count_token_internal (id_tok); |
765 } | 765 } |
766 } | 766 } |
767 | 767 |
768 "@" { | 768 "@" { |
769 if (curr_lexer->previous_token_may_be_command () | 769 if (curr_lexer->previous_token_may_be_command () |