From: Jan Nieuwenhuizen <janneke@gnu.org>
To: 25442@debbugs.gnu.org
Subject: bug#25442: Emacs compilation buffer segfault
Date: Fri, 13 Jan 2017 22:21:16 +0100 [thread overview]
Message-ID: <87lgue7j1v.fsf@gnu.org> (raw)
[-- Attachment #1: Type: text/plain, Size: 117 bytes --]
Hi!
Running
bash crash.nw
in an xterm makes Emacs segfault about 4 out of 5 times for me.
Greetings,
Jan
[-- Attachment #2: crash.nw --]
[-- Type: application/octet-stream, Size: 191 bytes --]
env -i TERM=xterm HOME=/tmp PATH=/run/current-system/profile/bin /gnu/store/5diw4kjwi6q75gk8yyx95l6f839gr5nj-emacs-25.1/bin/emacs -q --eval '(progn (compile "cat mes.crash")(delete-window))'
[-- Attachment #3: mes.crash --]
[-- Type: application/octet-stream, Size: 4390 bytes --]
boo: 2.0.13
compiling strlen
compiling getchar
compiling putchar
compiling eputs
compiling fputs
compiling puts
compiling strcmp
compiling assert_fail
SKIP statement=(expr-stmt (assn-expr (de-ref (cast (type-name (decl-spec-list (type-spec (fixed-type "int"))) (abs-declr (pointer))) (p-expr (fixed "0")))) (op "=") (p-expr (fixed "0"))))
SKIP statement=(decl (decl-spec-list (stor-spec (typedef)) (type-spec (fixed-type "int"))) (init-declr-list (init-declr (ident "SCM"))))
SKIP statement=(decl (decl-spec-list (stor-spec (typedef)) (type-spec (fixed-type "int")) (type-spec (typename "SCM"))))
SKIP statement=(decl (decl-spec-list (stor-spec (typedef)) (type-spec (typename "SCM"))) (init-declr-list (init-declr (ftn-declr (scope (ptr-declr (pointer) (ident "function0_t"))) (param-list (param-decl (decl-spec-list (type-spec (void)))))))))
SKIP statement=(decl (decl-spec-list (stor-spec (typedef)) (type-spec (typename "SCM"))) (init-declr-list (init-declr (ftn-declr (scope (ptr-declr (pointer) (ident "function1_t"))) (param-list (param-decl (decl-spec-list (type-spec (typename "SCM")))))))))
SKIP statement=(decl (decl-spec-list (stor-spec (typedef)) (type-spec (typename "SCM"))) (init-declr-list (init-declr (ftn-declr (scope (ptr-declr (pointer) (ident "function2_t"))) (param-list (param-decl (decl-spec-list (type-spec (typename "SCM")))) (param-decl (decl-spec-list (type-spec (typename "SCM")))))))))
SKIP statement=(decl (decl-spec-list (stor-spec (typedef)) (type-spec (typename "SCM"))) (init-declr-list (init-declr (ftn-declr (scope (ptr-declr (pointer) (ident "function3_t"))) (param-list (param-decl (decl-spec-list (type-spec (typename "SCM")))) (param-decl (decl-spec-list (type-spec (typename "SCM")))) (param-decl (decl-spec-list (type-spec (typename "SCM")))))))))
SKIP statement=(decl (decl-spec-list (stor-spec (typedef)) (type-spec (typename "SCM"))) (init-declr-list (init-declr (ftn-declr (scope (ptr-declr (pointer) (ident "functionn_t"))) (param-list (param-decl (decl-spec-list (type-spec (typename "SCM")))))))))
SKIP statement=(decl (decl-spec-list (stor-spec (typedef)) (type-spec (struct-def (ident "function_struct") (field-list (comp-decl (decl-spec-list (type-spec (union-def (field-list (comp-decl (decl-spec-list (type-spec (typename "function0_t"))) (comp-declr-list (comp-declr (ident "function0")))) (comp-decl (decl-spec-list (type-spec (typename "function1_t"))) (comp-declr-list (comp-declr (ident "function1")))) (comp-decl (decl-spec-list (type-spec (typename "function2_t"))) (comp-declr-list (comp-declr (ident "function2")))) (comp-decl (decl-spec-list (type-spec (typename "function3_t"))) (comp-declr-list (comp-declr (ident "function3")))) (comp-decl (decl-spec-list (type-spec (typename "functionn_t"))) (comp-declr-list (comp-declr (ident "functionn")))))))) (comp-declr-list (comp-declr (ident "data")))) (comp-decl (decl-spec-list (type-spec (fixed-type "int"))) (comp-declr-list (comp-declr (ident "arity")))))))) (init-declr-list (init-declr (ident "function_t"))))
SKIP statement=(decl (decl-spec-list (type-spec (struct-ref (ident "scm")))))
SKIP statement=(decl (decl-spec-list (type-spec (fixed-type "char"))) (init-declr-list (init-declr (array-of (ident "arena") (p-expr (fixed "200000"))))))
SKIP statement=(decl (decl-spec-list (type-spec (struct-ref (ident "scm")))) (init-declr-list (init-declr (ptr-declr (pointer) (ident "g_cells")) (initzer (cast (type-name (decl-spec-list (type-spec (struct-ref (ident "scm")))) (abs-declr (pointer))) (p-expr (ident "arena")))))))
compiling car
types: (("type_t" . "enum") ("scm" ("type_t" . "type") ("SCM" . "car") ("SCM" . "cdr")))
field: "car"
struct: (("type_t" . "type") ("SCM" . "car") ("SCM" . "cdr"))
struct-scm size: 3
struct-scm offset[car]: 8
compiling cdr
types: (("type_t" . "enum") ("scm" ("type_t" . "type") ("SCM" . "car") ("SCM" . "cdr")))
field: "cdr"
struct: (("type_t" . "type") ("SCM" . "car") ("SCM" . "cdr"))
struct-scm size: 3
struct-scm offset[cdr]: 8
compiling caar
SKIP expr->arg=(fctn-call (p-expr (ident car)) (expr-list (p-expr (ident x))))
compiling cadr
SKIP expr->arg=(fctn-call (p-expr (ident cdr)) (expr-list (p-expr (ident x))))
compiling cdar
SKIP expr->arg=(fctn-call (p-expr (ident car)) (expr-list (p-expr (ident x))))
compiling cddr
SKIP expr->arg=(fctn-call (p-expr (ident cdr)) (expr-list (p-expr (ident x))))
compiling gc_peek_frame
[-- Attachment #4: Type: text/plain, Size: 154 bytes --]
--
Jan Nieuwenhuizen <janneke@gnu.org> | GNU LilyPond http://lilypond.org
Freelance IT http://JoyofSource.com | Avatar® http://AvatarAcademy.nl
next reply other threads:[~2017-01-13 21:23 UTC|newest]
Thread overview: 7+ messages / expand[flat|nested] mbox.gz Atom feed top
2017-01-13 21:21 Jan Nieuwenhuizen [this message]
2017-01-14 16:06 ` bug#25442: stacktrace Jan Nieuwenhuizen
2017-01-14 17:24 ` Ludovic Courtès
2017-01-14 19:56 ` Jan Nieuwenhuizen
2017-01-15 20:30 ` Ludovic Courtès
2017-01-15 22:36 ` Jan Nieuwenhuizen
2017-09-30 7:36 ` Jan Nieuwenhuizen
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://guix.gnu.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87lgue7j1v.fsf@gnu.org \
--to=janneke@gnu.org \
--cc=25442@debbugs.gnu.org \
/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/guix.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).