From ae34566ab46931b370c6f0133ec57640d67ac0b9 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 11 Jan 1994 05:47:14 +0000 Subject: [PATCH] (hif-tokenize): Handle // comments after #if. --- lisp/progmodes/hideif.el | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/lisp/progmodes/hideif.el b/lisp/progmodes/hideif.el index 6394de36f7..a48e471f75 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)) -- 2.39.2