changeset 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
files libinterp/parse-tree/lex.ll
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/libinterp/parse-tree/lex.ll	Sat Mar 23 16:58:39 2013 -0400
+++ b/libinterp/parse-tree/lex.ll	Sun Mar 24 13:01:17 2013 -0400
@@ -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 ();
   }
 
 %{