(edebug-skip-whitespace): read1:lread.c says

that comments end at \n, regardless of selective-display.
This commit is contained in:
Stefan Monnier 2005-12-06 22:10:07 +00:00
parent 25c7f31583
commit 6a6e859a93
2 changed files with 8 additions and 4 deletions

View file

@ -733,8 +733,7 @@ already is one.)"
;; Leave point before the next token, skipping white space and comments.
(skip-chars-forward " \t\r\n\f")
(while (= (following-char) ?\;)
;; \r is counted as a comment terminator to support selective display.
(skip-chars-forward "^\n\r") ; skip the comment
(skip-chars-forward "^\n") ; skip the comment
(skip-chars-forward " \t\r\n\f")))