Commit ae34566a authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

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

parent 450b15a0
......@@ -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))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment