From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 31 May 1997 18:30:56 +0000 (+0000)
Subject: (Fforward_comment): Handle unmatched two-character comment starters.
X-Git-Tag: emacs-20.1~1866
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ae03af34440c078ef59145929b17eca696b9e3f7;p=emacs.git

(Fforward_comment): Handle unmatched two-character comment starters.
---

diff --git a/src/syntax.c b/src/syntax.c
index ed664805ecd..76428999ea1 100644
--- a/src/syntax.c
+++ b/src/syntax.c
@@ -1538,6 +1538,17 @@ between them, return t; otherwise return nil.")
 	      comstyle = SYNTAX_COMMENT_STYLE (c1);
 	      from = temp_pos;
 	    }
+	  if (from > stop && SYNTAX_COMSTART_SECOND (c)
+	      && (c1 = FETCH_CHAR (temp_pos),
+		  SYNTAX_COMSTART_FIRST (c1))
+	      && !char_quoted (temp_pos))
+	    {
+	      /* We must record the comment style encountered so that
+		 later, we can match only the proper comment begin
+		 sequence of the same style.  */
+	      code = Scomment;
+	      from = temp_pos;
+	    }
 
 	  if (code == Scomment_fence)
 	    {