From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Richard Stallman Newsgroups: gmane.emacs.devel Subject: Re: Discrepancy in definition/use of match-data? Date: Fri, 18 Jun 2004 23:19:53 -0400 Sender: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Message-ID: References: <87n03a7as9.fsf@tleepslib.sk.tsukuba.ac.jp> <87vfhx46lc.fsf@tleepslib.sk.tsukuba.ac.jp> <87vfhu20el.fsf@tleepslib.sk.tsukuba.ac.jp> <87brjkt1pr.fsf@tleepslib.sk.tsukuba.ac.jp> Reply-To: rms@gnu.org NNTP-Posting-Host: deer.gmane.org X-Trace: sea.gmane.org 1087615276 25128 80.91.224.253 (19 Jun 2004 03:21:16 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Sat, 19 Jun 2004 03:21:16 +0000 (UTC) Cc: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Sat Jun 19 05:21:11 2004 Return-path: Original-Received: from quimby.gnus.org ([80.91.224.244]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1BbWPn-0001nO-00 for ; Sat, 19 Jun 2004 05:21:11 +0200 Original-Received: from lists.gnu.org ([199.232.76.165]) by quimby.gnus.org with esmtp (Exim 3.35 #1 (Debian)) id 1BbWPn-0003Vd-00 for ; Sat, 19 Jun 2004 05:21:11 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.33) id 1BbWQv-0000AH-FK for emacs-devel@quimby.gnus.org; Fri, 18 Jun 2004 23:22:21 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.33) id 1BbWQH-0008Jd-TM for emacs-devel@gnu.org; Fri, 18 Jun 2004 23:21:41 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.33) id 1BbWQG-0008JG-JW for emacs-devel@gnu.org; Fri, 18 Jun 2004 23:21:41 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.33) id 1BbWQG-0008JB-B2 for emacs-devel@gnu.org; Fri, 18 Jun 2004 23:21:40 -0400 Original-Received: from [199.232.76.164] (helo=fencepost.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.34) id 1BbWOY-0006VV-RY for emacs-devel@gnu.org; Fri, 18 Jun 2004 23:19:57 -0400 Original-Received: from rms by fencepost.gnu.org with local (Exim 4.34) id 1BbWOX-0001KC-Rr; Fri, 18 Jun 2004 23:19:53 -0400 Original-To: "Stephen J. Turnbull" In-reply-to: <87brjkt1pr.fsf@tleepslib.sk.tsukuba.ac.jp> (stephen@xemacs.org) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.4 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Xref: main.gmane.org gmane.emacs.devel:25103 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:25103 font-lock.el (font-lock-fontify-keywords-region): all calls to match-{beginning,end} (font-lock-fontify-anchored-keywords): all calls to match-{beginning,end} Is it caused by this code? (defun c-find-invalid-doc-markup (regexp limit) ;; Used to fontify invalid markup in doc comments after the correct ;; ones have been fontified: Find the first occurence of REGEXP ;; between the point and LIMIT that only is fontified with ;; `c-doc-face-name'. If a match is found then submatch 0 surrounds ;; the first char and t is returned, otherwise nil is returned. (let (start) (while (if (re-search-forward regexp limit t) (not (eq (get-text-property (setq start (match-beginning 0)) 'face) c-doc-face-name)) (setq start nil))) (when start (store-match-data (list (copy-marker start) (copy-marker (1+ start)))) t)))