From: Richard Copley <rcopley@gmail.com>
To: Eli Zaretskii <eliz@gnu.org>
Cc: 28349@debbugs.gnu.org, Tom Tromey <tom@tromey.com>
Subject: bug#28349: 26.0.50; compilation mode syntax highlighting incorrect
Date: Sun, 10 Sep 2017 23:41:45 +0100 [thread overview]
Message-ID: <CAPM58ohRubqzX6bH-tqePNjFfPUYGjZVw-mgYqnJ+MAi0Z7oiQ@mail.gmail.com> (raw)
In-Reply-To: <CAPM58ogAOtLMR4gcB9dSvPEpqf8+c6SUHtwxDsjhwJ11DhjtrQ@mail.gmail.com>
On 10 September 2017 at 20:57, Richard Copley <rcopley@gmail.com> wrote:
> On 10 September 2017 at 20:42, Eli Zaretskii <eliz@gnu.org> wrote:
>>> From: Richard Copley <rcopley@gmail.com>
>>> Date: Sun, 10 Sep 2017 19:33:44 +0100
>>> Cc: Tom Tromey <tom@tromey.com>, 28349@debbugs.gnu.org
>>>
>>> Thanks. There seems to be another similar issue remaining.
>>> Font-locking still fails for some lines "at random". This time the errors are
>>>
>>> Error during redisplay: (jit-lock-function 94586) signaled
>>> (args-out-of-range 0 3)
>>> Error during redisplay: (jit-lock-function 284681) signaled
>>> (args-out-of-range 0 3)
>>> Error during redisplay: (jit-lock-function 285181) signaled
>>> (args-out-of-range 0 3)
>>
>> Can you show a more informative Lisp backtrace?
>
> If I disable jit-lock and enable debug-on-error, then re-run the
> compilation (toggling font-lock-mode is not sufficient), I get:
>
> Debugger entered--Lisp error: (args-out-of-range 0 3)
> add-text-properties(0 3 (compilation-message #s(compilation--message
> :loc (nil 37 (("addpm.c" "c:/projects/emacs/nt") nil (37 #3)) nil nil)
> :type 0 :end-loc nil) help-echo "mouse-2: visit this file and line"
> keymap compilation-button-map mouse-face highlight))
> compilation-parse-errors(6217 #<marker at 6913 in *compilation*>)
> compilation--parse-region(6217 #<marker at 6913 in *compilation*>)
> compilation--ensure-parse(6913)
> font-lock-fontify-keywords-region(6217 6913 nil)
> font-lock-default-fontify-region(6217 6913 nil)
> font-lock-fontify-region(6217 6913)
> font-lock-after-change-function(6217 6913 0)
> compilation-filter(#<process compilation> "make[1]: Entering
> directory '/c/projects/emacs/lib'\n AR libgnu.a\nmake[1]:
> Leaving directory '/c/projects/emacs/lib'\nmake[1]: Entering directory
> '/c/projects/emacs/nt'\n CCLD addpm.exe\naddpm.c:42:0: warning:
> \"_WIN32_WINNT\" redefined\n #define _WIN32_WINNT _WIN32_WINNT_WIN7\n
> \nIn file included from
> C:/msys64/mingw64/x86_64-w64-mingw32/include/crtdefs.h:10:0,\n
> from C:/msys64/mingw64/x86_64-w64-mingw32/include/stdlib.h:9,\n
> from
> addpm.c:37:\nC:/msys64/mingw64/x86_64-w64-mingw32/include/_mingw.h:225:0:
> note: this is the location of the previous definition\n #define
> _WIN32_WINNT 0x502\n \nmake[1]: Leaving directory
> '/c/projects/emacs/nt'\nmake -C lib-src all\n")
This is the backtrace when string-match sets the match data to (0 3):
(file-truename (cdr file))
(if (cdr file) (progn (file-truename (cdr file)) (debug)))
(let ((filename (car file)) (spec-directory (if (cdr file)
(file-truename (cdr file))))) (if (and (boundp
'comint-file-name-prefix) (not (equal comint-file-name-prefix "")))
(progn (if (file-name-absolute-p filename) (setq filename (concat
comint-file-name-prefix filename)) (if spec-directory (setq
spec-directory (file-truename (concat comint-file-name-prefix
spec-directory))))))) (if compilation-parse-errors-filename-function
(progn (setq filename (funcall
compilation-parse-errors-filename-function filename)))) (setq filename
(command-line-normalize-file-name filename)) (puthash file (or
(gethash (cons filename spec-directory) compilation-locs) (puthash
(cons filename spec-directory) (cons (list filename spec-directory)
(cons fmt nil)) compilation-locs)) compilation-locs))
(or (gethash file compilation-locs) (let ((filename (car file))
(spec-directory (if (cdr file) (file-truename (cdr file))))) (if (and
(boundp 'comint-file-name-prefix) (not (equal comint-file-name-prefix
""))) (progn (if (file-name-absolute-p filename) (setq filename
(concat comint-file-name-prefix filename)) (if spec-directory (setq
spec-directory (file-truename (concat comint-file-name-prefix
spec-directory))))))) (if compilation-parse-errors-filename-function
(progn (setq filename (funcall
compilation-parse-errors-filename-function filename)))) (setq filename
(command-line-normalize-file-name filename)) (puthash file (or
(gethash (cons filename spec-directory) compilation-locs) (puthash
(cons filename spec-directory) (cons (list filename spec-directory)
(cons fmt nil)) compilation-locs)) compilation-locs)))
compilation-get-file-structure(("addpm.c" . "/c/projects/emacs/nt") nil)
compilation-internal-error-properties(("addpm.c" .
"/c/projects/emacs/nt") 37 nil nil nil 0 nil)
compilation-error-properties(1 2 nil 3 nil 0 nil)
compilation-parse-errors(290 #<marker at 742 in *compilation*>)
compilation--parse-region(290 #<marker at 742 in *compilation*>)
compilation--ensure-parse(742)
font-lock-fontify-keywords-region(290 742 nil)
font-lock-default-fontify-region(290 742 nil)
font-lock-fontify-region(290 742)
font-lock-after-change-function(290 742 0)
compilation-filter(#<process compilation> " CCLD
addpm.exe\naddpm.c:42:0: warning: \"_WIN32_WINNT\" redefined\n #define
_WIN32_WINNT _WIN32_WINNT_WIN7\n \nIn file included from
C:/msys64/mingw64/x86_64-w64-mingw32/include/crtdefs.h:10:0,\n
from C:/msys64/mingw64/x86_64-w64-mingw32/include/stdlib.h:9,\n
from
addpm.c:37:\nC:/msys64/mingw64/x86_64-w64-mingw32/include/_mingw.h:225:0:
note: this is the location of the previous definition\n #define
_WIN32_WINNT 0x502\n \n")
next prev parent reply other threads:[~2017-09-10 22:41 UTC|newest]
Thread overview: 15+ messages / expand[flat|nested] mbox.gz Atom feed top
2017-09-04 19:21 bug#28349: 26.0.50; compilation mode syntax highlighting incorrect Richard Copley
2017-09-05 15:26 ` Eli Zaretskii
2017-09-09 18:05 ` Eli Zaretskii
2017-09-10 17:21 ` Tom Tromey
2017-09-10 18:33 ` Richard Copley
2017-09-10 19:42 ` Eli Zaretskii
2017-09-10 19:57 ` Richard Copley
2017-09-10 22:41 ` Richard Copley [this message]
2017-09-11 14:53 ` Eli Zaretskii
2017-09-11 15:33 ` Richard Copley
2017-09-11 16:56 ` Eli Zaretskii
2017-09-11 19:51 ` Richard Copley
2017-09-16 18:30 ` Richard Copley
2017-09-16 18:37 ` Eli Zaretskii
2017-09-16 18:49 ` Richard Copley
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=CAPM58ohRubqzX6bH-tqePNjFfPUYGjZVw-mgYqnJ+MAi0Z7oiQ@mail.gmail.com \
--to=rcopley@gmail.com \
--cc=28349@debbugs.gnu.org \
--cc=eliz@gnu.org \
--cc=tom@tromey.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).