Re: MPS: hash tables / obarrays

[Helmut Eller]

On Sun, May 19 2024, Gerd Möllmann wrote:

> What does it say when it fails?

I think it prints a non-interned symbol.  print-gensym seems to be t.
With exact roots:

gdb --args ../src/emacs -Q --batch -l src/comp-tests.el --eval
'(ert-run-tests-batch "comp-tests-bootstrap")'

...
(gdb) ba 20
#0  __pthread_kill_implementation
    (threadid=<optimized out>, signo=signo@entry=6, no_tid=no_tid@entry=0)
    at ./nptl/pthread_kill.c:44
#1  0x00007ffff2ca9e8f in __pthread_kill_internal
    (signo=6, threadid=<optimized out>) at ./nptl/pthread_kill.c:78
#2  0x00007ffff2c5afb2 in __GI_raise (sig=6) at ../sysdeps/posix/raise.c:26
#3  0x00005555557637a1 in terminate_due_to_signal
    (sig=6, backtrace_limit=2147483647) at emacs.c:480
#4  0x00005555559014c0 in igc_assert_fail
    (file=0x555555a03852 "igc.c", line=343, msg=0x555555a0387a "h->obj_type != 
IGC_OBJ_FWD") at igc.c:90
#5  0x00005555559016e6 in igc_check_fwd (client=0x7fffe2e7f268) at igc.c:343
#6  0x00005555558777a3 in XBARE_SYMBOL (a=0x2aaa8cd77588)
    at /scratch/emacs/emacs-igc/src/lisp.h:1166
#7  0x000055555587781b in XSYMBOL (a=0x2aaa8cd77588)
    at /scratch/emacs/emacs-igc/src/lisp.h:1179
#8  0x0000555555878319 in SYMBOL_INTERNED_P (sym=0x2aaa8cd77588)
    at /scratch/emacs/emacs-igc/src/lisp.h:2413
#9  0x000055555587f60f in print_object
    (obj=0x2aaa8cd77588, printcharfun=0x0, escapeflag=true) at print.c:2271
#10 0x00005555558809db in print_object
    (obj=0x7fffe3d24b4d, printcharfun=0x0, escapeflag=true) at print.c:2608
#11 0x000055555587ca32 in print
    (obj=0x7fffe253cc93, printcharfun=0x0, escapeflag=true) at print.c:1296
#12 0x000055555587b907 in Fprin1_to_string
    (object=0x7fffe253cc93, noescape=0x0, overrides=0x0) at print.c:814
#13 0x0000555555846ef1 in funcall_subr
    (subr=0x55555608a1e0 <Sprin1_to_string>, numargs=1, args=0x7fffde3b76c0)
    at eval.c:3104
#14 0x00005555558a4bd8 in exec_byte_code
    (fun=0x7fffeb74ab35, args_template=257, nargs=1, args=0x7fffffffaf70)
    at bytecode.c:829
#15 0x000055555584759f in funcall_lambda
    (fun=0x7fffeb74ab35, nargs=1, arg_vector=0x7fffffffaf68) at eval.c:3200
#16 0x000055555584688a in funcall_general
    (fun=0x7fffeb74ab35, numargs=1, args=0x7fffffffaf68) at eval.c:2982
#17 0x0000555555846b67 in Ffuncall (nargs=2, args=0x7fffffffaf60)
    at eval.c:3032
#18 0x0000555555858dfe in mapcar1
    (leni=5, vals=0x0, fn=0x7fffeb74ab35, seq=0x7fffe253cd6b) at fns.c:3346
#19 0x0000555555859611 in Fmapc
    (function=0x7fffeb74ab35, sequence=0x7fffe253cd6b) at fns.c:3483
(More stack frames follow...)
(gdb) p is_mps(0x2aaa8cd77588)
$1 = false
(gdb) p is_mps(0x7fffe2e7f268)
$2 = true