Mercurial > hg > octave-lyh
diff libinterp/parse-tree/lex.ll @ 16364:1e064963c90a
properly recognize nested block comments
* lex.ll (<BLOCK_COMMENT_START>^{S}*{CCHAR}\}{S}*{NL}): Decrement
block_comment_nesting_level. Pop start state if
block_comment_nesting_leve is 0. From John Donoghue
<john.donoghue@ieee.org>.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Sun, 24 Mar 2013 13:01:17 -0400 |
parents | d16c255299c0 |
children | 8097a052ec57 |
line wrap: on
line diff
--- a/libinterp/parse-tree/lex.ll +++ b/libinterp/parse-tree/lex.ll @@ -470,7 +470,9 @@ curr_lexer->finish_comment (octave_comment_elt::block); curr_lexer->block_comment_nesting_level--; - curr_lexer->pop_start_state (); + + if (curr_lexer->block_comment_nesting_level == 0) + curr_lexer->pop_start_state (); } %{