bug#21747: 25.0.50; while-no-input breaks kbd event handling when called from post-command-hook

[Tassilo Horn]

Eli Zaretskii <eliz@gnu.org> writes:

>> My recipe for reproduction is
>> 
>>   1. emacs -Q
>>   2. M-x package-initialize
>>   3. M-x global-aggressive-indent-mode
>>   4. C-x C-f ~/test.sh
>>   5. type the keyword if where the i is displayed immediately
>>      and the display of f is delayed
>> 
>> This does only occur for sh-mode keywords like if, while, etc. where the
>> delaying starts with after entering the last char of the keyword.  Also,
>> I can reproduce that problem only if test.sh doesn't exist.
>
> I don't understand: are you saying that the post-command-hook finished
> its job, and yet redisplay is not entered?

Yes, or rather the function aggressive-indent--indent-if-changed which
is in post-command-hook finished.

>> Or well, I just tried what happens when I replace the `while-no-input'
>> with a `progn'.  Then Emacs goes into some infloop.  Attaching with gdb
>> shows:
>
> There's a procedure in etc/DEBUG to determine which call-stack frame
> infloops, please use it and tell what you found.

Ok, so with the aggressive-indent--indent-if-changed where
while-no-input is replaced with progn, I perform my recipe until emacs
infloops.  Then do "kill -TSTP <PID>" and repeatedly "finish" at the gdb
prompt.  But the last frame being displayed in GDB before finish doesn't
return anymore is not always the same.  Most of the time it is poll ()
from /usr/lib/libc.so.6.  Here are two other results.

1st:

--8<---------------cut here---------------start------------->8---
Program received signal SIGTSTP, Stopped (user).
0x00000000005793ee in exec_byte_code (bytestr=<optimized out>, 
    vector=17328973, maxdepth=<optimized out>, 
    args_template=args_template@entry=2, nargs=nargs@entry=0, 
    args=<optimized out>, args@entry=0x7fffffffc7b0) at bytecode.c:818
818                 PUSH (v1);
(gdb) finish
Run till exit from #0  0x00000000005793ee in exec_byte_code (
    bytestr=<optimized out>, vector=17328973, maxdepth=<optimized out>, 
    args_template=args_template@entry=2, nargs=nargs@entry=0, 
    args=<optimized out>, args@entry=0x7fffffffc7b0) at bytecode.c:818

Program received signal SIGTSTP, Stopped (user).
0x00000000005793ee in exec_byte_code (bytestr=<optimized out>, 
    vector=17328973, maxdepth=<optimized out>, 
    args_template=args_template@entry=2, nargs=nargs@entry=0, 
    args=<optimized out>, args@entry=0x7fffffffc7b0) at bytecode.c:818
818                 PUSH (v1);
(gdb) finish
Run till exit from #0  0x00000000005793ee in exec_byte_code (
    bytestr=<optimized out>, vector=17328973, maxdepth=<optimized out>, 
    args_template=args_template@entry=2, nargs=nargs@entry=0, 
    args=<optimized out>, args@entry=0x7fffffffc7b0) at bytecode.c:818

Program received signal SIGTSTP, Stopped (user).
[Switching to Thread 0x7fffe498f700 (LWP 1864)]
deliver_input_available_signal (sig=29) at keyboard.c:7117
7117    {
(gdb) finish
Run till exit from #0  deliver_input_available_signal (sig=29)
    at keyboard.c:7117

Program received signal SIGTSTP, Stopped (user).
[Switching to Thread 0x7fffe620c700 (LWP 1863)]
0x00007ffff01c618d in poll () from /usr/lib/libc.so.6
(gdb) finish
Run till exit from #0  0x00007ffff01c618d in poll () from /usr/lib/libc.so.6

Program received signal SIGTSTP, Stopped (user).
[Switching to Thread 0x7fffe7080700 (LWP 1862)]
0x00007ffff01c618d in poll () from /usr/lib/libc.so.6
(gdb) finish
Run till exit from #0  0x00007ffff01c618d in poll () from /usr/lib/libc.so.6
--8<---------------cut here---------------end--------------->8---

2nd:

--8<---------------cut here---------------start------------->8---
Program received signal SIGTSTP, Stopped (user).
[Switching to Thread 0x7fffe620c700 (LWP 1863)]
0x00007ffff01c618d in poll () from /usr/lib/libc.so.6
(gdb) finish 
Run till exit from #0  0x00007ffff01c618d in poll () from /usr/lib/libc.so.6

Program received signal SIGTSTP, Stopped (user).
[Switching to Thread 0x7ffff7f19a00 (LWP 1858)]
Fequal (o1=24107556, o2=24556980) at fns.c:2199
2199    {
(gdb) finish 
Run till exit from #0  Fequal (o1=24107556, o2=24556980) at fns.c:2199
0x000000000057b61d in exec_byte_code (bytestr=<optimized out>, 
    vector=18636485, maxdepth=<optimized out>, 
    args_template=args_template@entry=1030, nargs=nargs@entry=1, 
    args=<optimized out>, args@entry=0x7fffffffcb10) at bytecode.c:1768
1768                TOP = Fequal (TOP, v1);
Value returned is $2 = 0
(gdb) finish 
Run till exit from #0  0x000000000057b61d in exec_byte_code (
    bytestr=<optimized out>, vector=18636485, maxdepth=<optimized out>, 
    args_template=args_template@entry=1030, nargs=nargs@entry=1, 
    args=<optimized out>, args@entry=0x7fffffffcb10) at bytecode.c:1768
0x0000000000549b2e in funcall_lambda (fun=18649053, nargs=nargs@entry=1, 
    arg_vector=arg_vector@entry=0x7fffffffcb10) at eval.c:2810
2810              return exec_byte_code (AREF (fun, COMPILED_BYTECODE),
Value returned is $3 = 44160
(gdb) finish 
Run till exit from #0  0x0000000000549b2e in funcall_lambda (fun=18649053, 
    nargs=nargs@entry=1, arg_vector=arg_vector@entry=0x7fffffffcb10)
    at eval.c:2810
0x000000000054a059 in Ffuncall (nargs=2, args=args@entry=0x7fffffffcb08)
    at eval.c:2699
2699        val = funcall_lambda (fun, numargs, args + 1);
Value returned is $4 = 44160
(gdb) finish 
Run till exit from #0  0x000000000054a059 in Ffuncall (nargs=2, 
    args=args@entry=0x7fffffffcb08) at eval.c:2699
0x00000000005794ed in exec_byte_code (bytestr=<optimized out>, 
    vector=17328973, maxdepth=<optimized out>, 
    args_template=args_template@entry=2, nargs=nargs@entry=0, 
    args=<optimized out>, args@entry=0x7fffffffccb8) at bytecode.c:880
880                 TOP = Ffuncall (op + 1, &TOP);
Value returned is $5 = 44160
(gdb) finish 
Run till exit from #0  0x00000000005794ed in exec_byte_code (
    bytestr=<optimized out>, vector=17328973, maxdepth=<optimized out>, 
    args_template=args_template@entry=2, nargs=nargs@entry=0, 
    args=<optimized out>, args@entry=0x7fffffffccb8) at bytecode.c:880
0x0000000000549b2e in funcall_lambda (fun=18825973, nargs=nargs@entry=0, 
    arg_vector=arg_vector@entry=0x7fffffffccb8) at eval.c:2810
2810              return exec_byte_code (AREF (fun, COMPILED_BYTECODE),
Value returned is $6 = 24107556
(gdb) finish 
Run till exit from #0  0x0000000000549b2e in funcall_lambda (fun=18825973, 
    nargs=nargs@entry=0, arg_vector=arg_vector@entry=0x7fffffffccb8)
    at eval.c:2810
0x000000000054a059 in Ffuncall (nargs=1, args=args@entry=0x7fffffffccb0)
    at eval.c:2699
2699        val = funcall_lambda (fun, numargs, args + 1);
Value returned is $7 = 24107556
(gdb) finish 
Run till exit from #0  0x000000000054a059 in Ffuncall (nargs=1, 
    args=args@entry=0x7fffffffccb0) at eval.c:2699
0x00000000005794ed in exec_byte_code (bytestr=<optimized out>, 
    vector=18627621, maxdepth=<optimized out>, 
    args_template=args_template@entry=1026, nargs=nargs@entry=0, 
    args=<optimized out>, args@entry=0x7fffffffce60) at bytecode.c:880
880                 TOP = Ffuncall (op + 1, &TOP);
Value returned is $8 = 24107556
(gdb) finish 
Run till exit from #0  0x00000000005794ed in exec_byte_code (
    bytestr=<optimized out>, vector=18627621, maxdepth=<optimized out>, 
    args_template=args_template@entry=1026, nargs=nargs@entry=0, 
    args=<optimized out>, args@entry=0x7fffffffce60) at bytecode.c:880
0x0000000000549b2e in funcall_lambda (fun=18631813, nargs=nargs@entry=0, 
    arg_vector=arg_vector@entry=0x7fffffffce60) at eval.c:2810
2810              return exec_byte_code (AREF (fun, COMPILED_BYTECODE),
Value returned is $9 = 0
(gdb) finish 
Run till exit from #0  0x0000000000549b2e in funcall_lambda (fun=18631813, 
    nargs=nargs@entry=0, arg_vector=arg_vector@entry=0x7fffffffce60)
    at eval.c:2810
0x000000000054a059 in Ffuncall (nargs=1, args=args@entry=0x7fffffffce58)
    at eval.c:2699
2699        val = funcall_lambda (fun, numargs, args + 1);
Value returned is $10 = 0
(gdb) finish 
Run till exit from #0  0x000000000054a059 in Ffuncall (nargs=1, 
    args=args@entry=0x7fffffffce58) at eval.c:2699
0x00000000005794ed in exec_byte_code (bytestr=<optimized out>, 
    vector=17475709, maxdepth=<optimized out>, 
    args_template=args_template@entry=2, nargs=nargs@entry=0, 
    args=<optimized out>, args@entry=0x7fffffffd048) at bytecode.c:880
880                 TOP = Ffuncall (op + 1, &TOP);
Value returned is $11 = 0
(gdb) finish 
Run till exit from #0  0x00000000005794ed in exec_byte_code (
    bytestr=<optimized out>, vector=17475709, maxdepth=<optimized out>, 
    args_template=args_template@entry=2, nargs=nargs@entry=0, 
    args=<optimized out>, args@entry=0x7fffffffd048) at bytecode.c:880
0x0000000000549b2e in funcall_lambda (fun=18821861, nargs=nargs@entry=0, 
    arg_vector=arg_vector@entry=0x7fffffffd048) at eval.c:2810
2810              return exec_byte_code (AREF (fun, COMPILED_BYTECODE),
Value returned is $12 = 24664900
(gdb) finish 
Run till exit from #0  0x0000000000549b2e in funcall_lambda (fun=18821861, 
    nargs=nargs@entry=0, arg_vector=arg_vector@entry=0x7fffffffd048)
    at eval.c:2810
0x000000000054a059 in Ffuncall (nargs=1, args=args@entry=0x7fffffffd040)
    at eval.c:2699
2699        val = funcall_lambda (fun, numargs, args + 1);
Value returned is $13 = 24664900
(gdb) finish 
Run till exit from #0  0x000000000054a059 in Ffuncall (nargs=1, 
    args=args@entry=0x7fffffffd040) at eval.c:2699
0x00000000005794ed in exec_byte_code (bytestr=<optimized out>, 
    vector=18431125, maxdepth=<optimized out>, 
    args_template=args_template@entry=5142, nargs=nargs@entry=5, 
    args=<optimized out>, args@entry=0x7fffffffd248) at bytecode.c:880
880                 TOP = Ffuncall (op + 1, &TOP);
Value returned is $14 = 24664900
(gdb) finish 
Run till exit from #0  0x00000000005794ed in exec_byte_code (
    bytestr=<optimized out>, vector=18431125, maxdepth=<optimized out>, 
    args_template=args_template@entry=5142, nargs=nargs@entry=5, 
    args=<optimized out>, args@entry=0x7fffffffd248) at bytecode.c:880
--8<---------------cut here---------------end--------------->8---

Right now, there was another one where I could type "finish" at least a
hundred times and still I'm not done, i.e., it "finish" still returns.
But that seems to be in GC which might be normal.

--8<---------------cut here---------------start------------->8---
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6215
mark_object (arg=<optimized out>) at alloc.c:6207
6207            switch (ptr->redirect)
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6207
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
0x00000000005340d3 in mark_object (arg=<optimized out>) at alloc.c:6209
6209              case SYMBOL_PLAINVAL: mark_object (SYMBOL_VAL (ptr)); break;
(gdb) finish 
Run till exit from #0  0x00000000005340d3 in mark_object (arg=<optimized out>)
    at alloc.c:6209
mark_vectorlike (ptr=ptr@entry=0x1282e18) at alloc.c:5790
5790      for (i = 0; i < size; i++) /* ...and then mark its elements.  */
(gdb) finish 
Run till exit from #0  mark_vectorlike (ptr=ptr@entry=0x1282e18)
    at alloc.c:5790
0x000000000053407d in mark_object (arg=<optimized out>) at alloc.c:6190
6190                mark_vectorlike (ptr);
(gdb) finish 
Run till exit from #0  0x000000000053407d in mark_object (arg=<optimized out>)
    at alloc.c:6190
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_vectorlike (ptr=ptr@entry=0x1180b78) at alloc.c:5790
5790      for (i = 0; i < size; i++) /* ...and then mark its elements.  */
(gdb) finish 
Run till exit from #0  mark_vectorlike (ptr=ptr@entry=0x1180b78)
    at alloc.c:5790
0x000000000053407d in mark_object (arg=<optimized out>) at alloc.c:6190
6190                mark_vectorlike (ptr);
(gdb) finish 
Run till exit from #0  0x000000000053407d in mark_object (arg=<optimized out>)
    at alloc.c:6190
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_localized_symbol (ptr=ptr@entry=0xfa09a0) at alloc.c:5915
5915      mark_object (blv->defcell);
(gdb) finish 
Run till exit from #0  mark_localized_symbol (ptr=ptr@entry=0xfa09a0)
    at alloc.c:5915
mark_object (arg=<optimized out>) at alloc.c:6219
6219                break;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6219
mark_vectorlike (ptr=ptr@entry=0x12225a0) at alloc.c:5790
5790      for (i = 0; i < size; i++) /* ...and then mark its elements.  */
(gdb) finish 
Run till exit from #0  mark_vectorlike (ptr=ptr@entry=0x12225a0)
    at alloc.c:5790
0x000000000053407d in mark_object (arg=<optimized out>) at alloc.c:6190
6190                mark_vectorlike (ptr);
(gdb) finish 
Run till exit from #0  0x000000000053407d in mark_object (arg=<optimized out>)
    at alloc.c:6190
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_vectorlike (ptr=ptr@entry=0x130f788) at alloc.c:5790
5790      for (i = 0; i < size; i++) /* ...and then mark its elements.  */
(gdb) finish 
Run till exit from #0  mark_vectorlike (ptr=ptr@entry=0x130f788)
    at alloc.c:5790
0x000000000053407d in mark_object (arg=<optimized out>) at alloc.c:6190
6190                mark_vectorlike (ptr);
(gdb) finish 
Run till exit from #0  0x000000000053407d in mark_object (arg=<optimized out>)
    at alloc.c:6190
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_compiled (ptr=0x130f840) at alloc.c:5830
5830      for (i = 0; i < size; i++)
(gdb) finish 
Run till exit from #0  mark_compiled (ptr=0x130f840) at alloc.c:5830
0x0000000000533f40 in mark_object (arg=<optimized out>) at alloc.c:6107
6107                obj = mark_compiled (ptr);
Value returned is $25 = 18074453
(gdb) finish 
Run till exit from #0  0x0000000000533f40 in mark_object (arg=<optimized out>)
    at alloc.c:6107
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6207
6207            switch (ptr->redirect)
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6207
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_vectorlike (ptr=ptr@entry=0x11d7168) at alloc.c:5790
5790      for (i = 0; i < size; i++) /* ...and then mark its elements.  */
(gdb) finish 
Run till exit from #0  mark_vectorlike (ptr=ptr@entry=0x11d7168)
    at alloc.c:5790
0x000000000053407d in mark_object (arg=<optimized out>) at alloc.c:6190
6190                mark_vectorlike (ptr);
(gdb) finish 
Run till exit from #0  0x000000000053407d in mark_object (arg=<optimized out>)
    at alloc.c:6190
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_vectorlike (ptr=ptr@entry=0x12071e0) at alloc.c:5790
5790      for (i = 0; i < size; i++) /* ...and then mark its elements.  */
(gdb) finish 
Run till exit from #0  mark_vectorlike (ptr=ptr@entry=0x12071e0)
    at alloc.c:5790
0x000000000053407d in mark_object (arg=<optimized out>) at alloc.c:6190
6190                mark_vectorlike (ptr);
(gdb) finish 
Run till exit from #0  0x000000000053407d in mark_object (arg=<optimized out>)
    at alloc.c:6190
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6207
6207            switch (ptr->redirect)
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6207
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_localized_symbol (ptr=ptr@entry=0xc2d770) at alloc.c:5915
5915      mark_object (blv->defcell);
(gdb) finish 
Run till exit from #0  mark_localized_symbol (ptr=ptr@entry=0xc2d770)
    at alloc.c:5915
mark_object (arg=<optimized out>) at alloc.c:6219
6219                break;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6219
mark_vectorlike (ptr=ptr@entry=0x1286bb8) at alloc.c:5790
5790      for (i = 0; i < size; i++) /* ...and then mark its elements.  */
(gdb) finish 
Run till exit from #0  mark_vectorlike (ptr=ptr@entry=0x1286bb8)
    at alloc.c:5790
0x000000000053407d in mark_object (arg=<optimized out>) at alloc.c:6190
6190                mark_vectorlike (ptr);
(gdb) finish 
Run till exit from #0  0x000000000053407d in mark_object (arg=<optimized out>)
    at alloc.c:6190
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_vectorlike (ptr=ptr@entry=0x11a1d70) at alloc.c:5790
5790      for (i = 0; i < size; i++) /* ...and then mark its elements.  */
(gdb) finish 
Run till exit from #0  mark_vectorlike (ptr=ptr@entry=0x11a1d70)
    at alloc.c:5790
0x000000000053407d in mark_object (arg=<optimized out>) at alloc.c:6190
6190                mark_vectorlike (ptr);
(gdb) finish 
Run till exit from #0  0x000000000053407d in mark_object (arg=<optimized out>)
    at alloc.c:6190
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
0x00000000005340d3 in mark_object (arg=<optimized out>) at alloc.c:6209
6209              case SYMBOL_PLAINVAL: mark_object (SYMBOL_VAL (ptr)); break;
(gdb) finish 
Run till exit from #0  0x00000000005340d3 in mark_object (arg=<optimized out>)
    at alloc.c:6209
mark_vectorlike (ptr=ptr@entry=0x120d240) at alloc.c:5790
5790      for (i = 0; i < size; i++) /* ...and then mark its elements.  */
(gdb) finish 
Run till exit from #0  mark_vectorlike (ptr=ptr@entry=0x120d240)
    at alloc.c:5790
0x000000000053407d in mark_object (arg=<optimized out>) at alloc.c:6190
6190                mark_vectorlike (ptr);
(gdb) finish 
Run till exit from #0  0x000000000053407d in mark_object (arg=<optimized out>)
    at alloc.c:6190
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_vectorlike (ptr=ptr@entry=0x1be6fe8) at alloc.c:5790
5790      for (i = 0; i < size; i++) /* ...and then mark its elements.  */
(gdb) finish 
Run till exit from #0  mark_vectorlike (ptr=ptr@entry=0x1be6fe8)
    at alloc.c:5790
0x000000000053407d in mark_object (arg=<optimized out>) at alloc.c:6190
6190                mark_vectorlike (ptr);
(gdb) finish 
Run till exit from #0  0x000000000053407d in mark_object (arg=<optimized out>)
    at alloc.c:6190
0x0000000000534031 in mark_object (arg=<optimized out>) at alloc.c:6167
6167                    mark_object (h->key_and_value);
(gdb) finish 
Run till exit from #0  0x0000000000534031 in mark_object (arg=<optimized out>)
    at alloc.c:6167
0x00000000005340d3 in mark_object (arg=<optimized out>) at alloc.c:6209
6209              case SYMBOL_PLAINVAL: mark_object (SYMBOL_VAL (ptr)); break;
(gdb) finish 
Run till exit from #0  0x00000000005340d3 in mark_object (arg=<optimized out>)
    at alloc.c:6209
mark_vectorlike (ptr=ptr@entry=0x120d408) at alloc.c:5790
5790      for (i = 0; i < size; i++) /* ...and then mark its elements.  */
(gdb) finish 
Run till exit from #0  mark_vectorlike (ptr=ptr@entry=0x120d408)
    at alloc.c:5790
0x000000000053407d in mark_object (arg=<optimized out>) at alloc.c:6190
6190                mark_vectorlike (ptr);
(gdb) finish 
Run till exit from #0  0x000000000053407d in mark_object (arg=<optimized out>)
    at alloc.c:6190
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
0x00000000005340d3 in mark_object (arg=<optimized out>) at alloc.c:6209
6209              case SYMBOL_PLAINVAL: mark_object (SYMBOL_VAL (ptr)); break;
(gdb) finish 
Run till exit from #0  0x00000000005340d3 in mark_object (arg=<optimized out>)
    at alloc.c:6209
mark_vectorlike (ptr=ptr@entry=0x128adb0) at alloc.c:5790
5790      for (i = 0; i < size; i++) /* ...and then mark its elements.  */
(gdb) finish 
Run till exit from #0  mark_vectorlike (ptr=ptr@entry=0x128adb0)
    at alloc.c:5790
0x000000000053407d in mark_object (arg=<optimized out>) at alloc.c:6190
6190                mark_vectorlike (ptr);
(gdb) finish 
Run till exit from #0  0x000000000053407d in mark_object (arg=<optimized out>)
    at alloc.c:6190
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_vectorlike (ptr=ptr@entry=0x128bd90) at alloc.c:5790
5790      for (i = 0; i < size; i++) /* ...and then mark its elements.  */
(gdb) finish 
Run till exit from #0  mark_vectorlike (ptr=ptr@entry=0x128bd90)
    at alloc.c:5790
0x000000000053407d in mark_object (arg=<optimized out>) at alloc.c:6190
6190                mark_vectorlike (ptr);
(gdb) finish 
Run till exit from #0  0x000000000053407d in mark_object (arg=<optimized out>)
    at alloc.c:6190
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_compiled (ptr=0x128ce88) at alloc.c:5830
5830      for (i = 0; i < size; i++)
(gdb) finish 
Run till exit from #0  mark_compiled (ptr=0x128ce88) at alloc.c:5830
0x0000000000533f40 in mark_object (arg=<optimized out>) at alloc.c:6107
6107                obj = mark_compiled (ptr);
Value returned is $26 = 19451469
(gdb) finish 
Run till exit from #0  0x0000000000533f40 in mark_object (arg=<optimized out>)
    at alloc.c:6107
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6207
6207            switch (ptr->redirect)
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6207
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6207
6207            switch (ptr->redirect)
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6207
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_vectorlike (ptr=ptr@entry=0x1215678) at alloc.c:5790
5790      for (i = 0; i < size; i++) /* ...and then mark its elements.  */
(gdb) finish 
Run till exit from #0  mark_vectorlike (ptr=ptr@entry=0x1215678)
    at alloc.c:5790
0x000000000053407d in mark_object (arg=<optimized out>) at alloc.c:6190
6190                mark_vectorlike (ptr);
(gdb) finish 
Run till exit from #0  0x000000000053407d in mark_object (arg=<optimized out>)
    at alloc.c:6190
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6207
6207            switch (ptr->redirect)
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6207
mark_vectorlike (ptr=ptr@entry=0xf82e50) at alloc.c:5790
5790      for (i = 0; i < size; i++) /* ...and then mark its elements.  */
(gdb) finish 
Run till exit from #0  mark_vectorlike (ptr=ptr@entry=0xf82e50) at alloc.c:5790
0x000000000053407d in mark_object (arg=<optimized out>) at alloc.c:6190
6190                mark_vectorlike (ptr);
(gdb) finish 
Run till exit from #0  0x000000000053407d in mark_object (arg=<optimized out>)
    at alloc.c:6190
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6207
6207            switch (ptr->redirect)
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6207
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6207
6207            switch (ptr->redirect)
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6207
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6207
6207            switch (ptr->redirect)
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6207
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
0x00000000005340d3 in mark_object (arg=<optimized out>) at alloc.c:6209
6209              case SYMBOL_PLAINVAL: mark_object (SYMBOL_VAL (ptr)); break;
(gdb) finish 
Run till exit from #0  0x00000000005340d3 in mark_object (arg=<optimized out>)
    at alloc.c:6209
mark_vectorlike (ptr=ptr@entry=0x1226380) at alloc.c:5790
5790      for (i = 0; i < size; i++) /* ...and then mark its elements.  */
(gdb) finish 
Run till exit from #0  mark_vectorlike (ptr=ptr@entry=0x1226380)
    at alloc.c:5790
0x000000000053407d in mark_object (arg=<optimized out>) at alloc.c:6190
6190                mark_vectorlike (ptr);
(gdb) finish 
Run till exit from #0  0x000000000053407d in mark_object (arg=<optimized out>)
    at alloc.c:6190
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
0x00000000005340d3 in mark_object (arg=<optimized out>) at alloc.c:6209
6209              case SYMBOL_PLAINVAL: mark_object (SYMBOL_VAL (ptr)); break;
(gdb) finish 
Run till exit from #0  0x00000000005340d3 in mark_object (arg=<optimized out>)
    at alloc.c:6209
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6206
6206            mark_object (ptr->plist);
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6206
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6287
6287            obj = ptr->u.cdr;
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6287
mark_object (arg=<optimized out>) at alloc.c:6207
6207            switch (ptr->redirect)
(gdb) finish 
Run till exit from #0  mark_object (arg=<optimized out>) at alloc.c:6207
mark_char_table (ptr=0xc1aee0, pvectype=pvectype@entry=PVEC_SUB_CHAR_TABLE)
    at alloc.c:5807
5807      for (i = idx; i < size; i++)
(gdb) finish 
Run till exit from #0  mark_char_table (ptr=0xc1aee0, 
    pvectype=pvectype@entry=PVEC_SUB_CHAR_TABLE) at alloc.c:5807
0x00000000005353e2 in mark_char_table (ptr=ptr@entry=0xbe5708, 
pvectype=<optimized out>)
    at alloc.c:5816
5816                mark_char_table (XVECTOR (val), PVEC_SUB_CHAR_TABLE);
--8<---------------cut here---------------end--------------->8---

Bye,
Tassilo