From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 11 Jan 1994 05:47:14 +0000 (+0000)
Subject: (hif-tokenize): Handle // comments after #if.
X-Git-Tag: emacs-19.34~10291
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ae34566ab46931b370c6f0133ec57640d67ac0b9;p=emacs.git

(hif-tokenize): Handle // comments after #if.
---

diff --git a/lisp/progmodes/hideif.el b/lisp/progmodes/hideif.el
index 6394de36f71..a48e471f753 100644
--- a/lisp/progmodes/hideif.el
+++ b/lisp/progmodes/hideif.el
@@ -402,6 +402,11 @@ that form should be displayed.")
 	 (aset expr-string (1- expr-start) ?\n)
 	 )
 
+	((string-match "^//" expr-string expr-start)
+	 (string-match "$" expr-string expr-start)
+	 (setq expr-start (match-end 0))
+	 )
+
 	((string-match hif-token-regexp expr-string expr-start)
 	  (let ((token (substring expr-string expr-start (match-end 0))))
 	    (setq expr-start (match-end 0))