Re: [Emacs-diffs] /srv/bzr/emacs/trunk r109660: Functions to get and set Lisp_Object fields of buffer-local variables.

Re: [Emacs-diffs] /srv/bzr/emacs/trunk r109660: Functions to get and set Lisp_Object fields of buffer-local variables.

[Juanma Barranquero]

On Fri, Aug 17, 2012 at 4:24 PM, Dmitry Antipov <dmantipov@yandex.ru> wrote:
> ------------------------------------------------------------
> revno: 109660
> committer: Dmitry Antipov <dmantipov@yandex.ru>
> branch nick: trunk
> timestamp: Fri 2012-08-17 18:24:43 +0400
> message:
>   Functions to get and set Lisp_Object fields of buffer-local variables.


"./../nt/oo-spd/i386/addsection" "oo-spd/i386/temacs.bin"
"oo-spd/i386/temacs.exe" EMHEAP 27
Dumping from oo-spd/i386/temacs.bin
          to oo-spd/i386/temacs.exe
"./oo-spd/i386/temacs.exe" -batch -l loadup dump

lisp.h:2416: Emacs fatal error: assertion failed: found == !EQ
(blv->defcell, blv->valcell)


Program received signal SIGTRAP, Trace/breakpoint trap.
[Switching to Thread 1192.0x19a4]
0x7526280d in KERNELBASE!DeleteAce () from C:\Windows\syswow64\KernelBase.dll
(gdb) bt
#0  0x7526280d in KERNELBASE!DeleteAce () from
C:\Windows\syswow64\KernelBase.dll
#1  0x010f418c in w32_abort () at w32fns.c:7217
#2  0x0100a908 in die (msg=0x143c8b8 "assertion failed: found == !EQ
(blv->defcell, blv->valcell)", file=0x143c890 "lisp.h", line=2416)
    at alloc.c:6691
#3  0x01245334 in set_blv_found (found=<optimized out>, blv=<optimized
out>) at lisp.h:2416
#4  0x01007052 in set_blv_found (found=<optimized out>, blv=<optimized
out>) at lisp.h:2416
#5  set_internal (symbol=<optimized out>, newval=56965146,
where=<optimized out>, bindflag=1) at data.c:1202
#6  0x01016044 in specbind (symbol=57066170, value=56965146) at eval.c:3209
#7  0x0104b04c in Fload (file=57077377, noerror=56965146,
nomessage=56965146, nosuffix=56965146, must_suffix=<optimized out>) at
lread.c:1164
#8  0x0101382a in eval_sub (form=56946990) at eval.c:2173
#9  0x01016af2 in Feval (form=56946990, lexical=56965146) at eval.c:2021
#10 0x0102709c in top_level_2 () at keyboard.c:1161
#11 0x010127ab in internal_condition_case (bfun=0x1027080
<top_level_2>, handlers=57015754, hfun=0x10298c0 <cmd_error>) at
eval.c:1308
#12 0x01027bf0 in top_level_1 (ignore=56965146) at keyboard.c:1169
#13 0x010126e9 in internal_catch (tag=57005586, func=0x1027b90
<top_level_1>, arg=56965146) at eval.c:1065
#14 0x0102928e in command_loop () at keyboard.c:1124
#15 recursive_edit_1 () at keyboard.c:752
#16 0x01029616 in Frecursive_edit () at keyboard.c:816
#17 0x01244ba1 in main (argc=<optimized out>, argv=0x922cf0) at emacs.c:1666

Lisp Backtrace:
"load" (0x88fc44)
(gdb) frame 7
#7  0x0104b04c in Fload (file=57077377, noerror=56965146,
nomessage=56965146, nosuffix=56965146, must_suffix=<optimized out>) at
lread.c:1164
1164      specbind (Qlexical_binding, Qnil);
(gdb) p file
$1 = 57077377
(gdb) pr
[New Thread 1192.0x18b8]
(gdb) p file
$2 = 57077377
(gdb) xtype
Lisp_String
(gdb) xstring
$3 = (struct Lisp_String *) 0x366ee80
"loadup.el"
(gdb)

Re: [Emacs-diffs] /srv/bzr/emacs/trunk r109660: Functions to get and set Lisp_Object fields of buffer-local variables.

[Eli Zaretskii]

> From: Juanma Barranquero <lekktu@gmail.com>
> Date: Fri, 17 Aug 2012 23:02:27 +0200
> Cc: Emacs developers <emacs-devel@gnu.org>
> 
> On Fri, Aug 17, 2012 at 4:24 PM, Dmitry Antipov <dmantipov@yandex.ru> wrote:
> > ------------------------------------------------------------
> > revno: 109660
> > committer: Dmitry Antipov <dmantipov@yandex.ru>
> > branch nick: trunk
> > timestamp: Fri 2012-08-17 18:24:43 +0400
> > message:
> >   Functions to get and set Lisp_Object fields of buffer-local variables.
> 
> 
> "./../nt/oo-spd/i386/addsection" "oo-spd/i386/temacs.bin"
> "oo-spd/i386/temacs.exe" EMHEAP 27
> Dumping from oo-spd/i386/temacs.bin
>           to oo-spd/i386/temacs.exe
> "./oo-spd/i386/temacs.exe" -batch -l loadup dump
> 
> lisp.h:2416: Emacs fatal error: assertion failed: found == !EQ
> (blv->defcell, blv->valcell)

The old code had no asserts, so I commented out the assert (locally),
and the build proceeded with no problems.

Here's a backtrace and some additional relevant data from an
unoptimized build, if it helps:

  Program received signal SIGTRAP, Trace/breakpoint trap.
  [Switching to Thread 6036.0x1760]
  0x7c90120f in ntdll!DbgUiConnectToDbg () from C:\WINDOWS\system32\ntdll.dll
  (gdb) bt
  #0  0x7c90120f in ntdll!DbgUiConnectToDbg ()
     from C:\WINDOWS\system32\ntdll.dll
  #1  0x0122e84e in w32_abort () at w32fns.c:7217
  #2  0x010434c2 in die (
      msg=0x153d2a8 "assertion failed: found == !EQ (blv->defcell, blv->valcell)", file=0x153cd52 "lisp.h", line=2416) at alloc.c:6691
  #3  0x01027fc7 in set_blv_found (blv=0x34479c0, found=1) at lisp.h:2416
  #4  0x01028cf1 in set_internal (symbol=54901482, newval=54822938,
      where=54849029, bindflag=1) at data.c:1187
  #5  0x01038c4e in specbind (symbol=54901482, value=54822938) at eval.c:3209
  #6  0x0106a272 in Fload (file=54999057, noerror=54822938, nomessage=54822938,
      nosuffix=54822938, must_suffix=54822938) at lread.c:1164
  #7  0x0103547a in eval_sub (form=54804902) at eval.c:2173
  #8  0x0103495f in Feval (form=54804902, lexical=54822938) at eval.c:2021
  #9  0x01005448 in top_level_2 () at keyboard.c:1213
  #10 0x01032e24 in internal_condition_case (bfun=0x100542c <top_level_2>,
      handlers=54873594, hfun=0x1004fb3 <cmd_error>) at eval.c:1308
  #11 0x0100547a in top_level_1 (ignore=54822938) at keyboard.c:1221
  #12 0x010327e3 in internal_catch (tag=54863426, func=0x100544a <top_level_1>,
      arg=54822938) at eval.c:1065
  #13 0x010053b5 in command_loop () at keyboard.c:1176
  #14 0x01004971 in recursive_edit_1 () at keyboard.c:804
  #15 0x01004c93 in Frecursive_edit () at keyboard.c:868
  #16 0x010029c4 in main (argc=5, argv=0xa42678) at emacs.c:1666

  Lisp Backtrace:
  "load" (0x82fc20)
  (gdb) frame 6
  #6  0x0106a272 in Fload (file=54999057, noerror=54822938, nomessage=54822938,
      nosuffix=54822938, must_suffix=54822938) at lread.c:1164
  1164      specbind (Qlexical_binding, Qnil);
  (gdb) p file
  $1 = 54999057
  (gdb) xstring
  $2 = (struct Lisp_String *) 0x3473810
  "loadup.el"
  (gdb) frame  4
  #4  0x01028cf1 in set_internal (symbol=54901482, newval=54822938,
      where=54849029, bindflag=1) at data.c:1187
  1187                set_blv_found (blv, 1);
  (gdb) p blv->where
  $3 = 54849029
  (gdb) xbuffer
  $4 = (struct buffer *) 0x344ee00
  (unsigned char *) 0x3450018 "*scratch*"
  (gdb) p blv->defcell
  $5 = 54808358
  (gdb) xcar
  $6 = 0x345baea
  (gdb) xsymbol
  $7 = (struct Lisp_Symbol *) 0x345bae8
  "lexical-binding"
  (gdb) p blv->valcell
  $8 = 54808358
  (gdb) p blv->fwd
  $9 = (union Lisp_Fwd *) 0x163c2e0