[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/emacs-23 r100118: (regexp-opt-group, regexp
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/emacs-23 r100118: (regexp-opt-group, regexp-opt-charset): Turn comments into docstrings |
Date: |
Sun, 17 Oct 2010 14:59:58 -0400 |
User-agent: |
Bazaar (2.0.3) |
------------------------------------------------------------
revno: 100118
committer: Stefan Monnier <address@hidden>
branch nick: emacs-23
timestamp: Sun 2010-10-17 14:59:58 -0400
message:
(regexp-opt-group, regexp-opt-charset): Turn comments into docstrings
modified:
lisp/emacs-lisp/regexp-opt.el
=== modified file 'lisp/emacs-lisp/regexp-opt.el'
--- a/lisp/emacs-lisp/regexp-opt.el 2010-01-13 08:35:10 +0000
+++ b/lisp/emacs-lisp/regexp-opt.el 2010-10-17 18:59:58 +0000
@@ -136,11 +136,10 @@
(require 'cl))
(defun regexp-opt-group (strings &optional paren lax)
- ;; Return a regexp to match a string in the sorted list STRINGS.
- ;; If PAREN non-nil, output regexp parentheses around returned regexp.
- ;; If LAX non-nil, don't output parentheses if it doesn't require them.
- ;; Merges keywords to avoid backtracking in Emacs' regexp matcher.
-
+ "Return a regexp to match a string in the sorted list STRINGS.
+If PAREN non-nil, output regexp parentheses around returned regexp.
+If LAX non-nil, don't output parentheses if it doesn't require them.
+Merges keywords to avoid backtracking in Emacs' regexp matcher."
;; The basic idea is to find the shortest common prefix or suffix, remove it
;; and recurse. If there is no prefix, we divide the list into two so that
;; \(at least) one half will have at least a one-character common prefix.
@@ -234,9 +233,7 @@
(defun regexp-opt-charset (chars)
- ;;
- ;; Return a regexp to match a character in CHARS.
- ;;
+ "Return a regexp to match a character in CHARS."
;; The basic idea is to find character ranges. Also we take care in the
;; position of character set meta characters in the character set regexp.
;;
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/emacs-23 r100118: (regexp-opt-group, regexp-opt-charset): Turn comments into docstrings,
Stefan Monnier <=