test crash and NRE debug exploration

mig@ari:~/DEVEL/tcl-core/tmp/unix$ ./tcltest 
% proc foo {} bar
% proc bar {} sum
% proc sum {} testpanic
% foo

Aborted (core dumped)
mig@ari:~/DEVEL/tcl-core/tmp/unix$ gdb ./tcltest core 
GNU gdb (GDB) 7.2-ubuntu
Copyright (C) 2010 Free Software Foundation, Inc.
License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law.  Type "show copying"
and "show warranty" for details.
This GDB was configured as "x86_64-linux-gnu".
For bug reporting instructions, please see:
<http://www.gnu.org/software/gdb/bugs/>...
Reading symbols from /home/mig/DEVEL/tcl-core/tmp/unix/tcltest...done.
[New Thread 10922]
[New Thread 10923]

warning: Can't read pathname for load map: Input/output error.
Reading symbols from /lib/libdl.so.2...Reading symbols from /usr/lib/debug/lib/libdl-2.12.1.so...done.
done.
Loaded symbols for /lib/libdl.so.2
Reading symbols from /lib/libpthread.so.0...Reading symbols from /usr/lib/debug/lib/libpthread-2.12.1.so...done.
done.
Loaded symbols for /lib/libpthread.so.0
Reading symbols from /lib/libm.so.6...Reading symbols from /usr/lib/debug/lib/libm-2.12.1.so...done.
done.
Loaded symbols for /lib/libm.so.6
Reading symbols from /lib/libc.so.6...Reading symbols from /usr/lib/debug/lib/libc-2.12.1.so...done.
done.
Loaded symbols for /lib/libc.so.6
Reading symbols from /lib64/ld-linux-x86-64.so.2...Reading symbols from /usr/lib/debug/lib/ld-2.12.1.so...done.
done.
Loaded symbols for /lib64/ld-linux-x86-64.so.2
Reading symbols from /lib/libnss_compat.so.2...Reading symbols from /usr/lib/debug/lib/libnss_compat-2.12.1.so...done.
done.
Loaded symbols for /lib/libnss_compat.so.2
Reading symbols from /lib/libnsl.so.1...Reading symbols from /usr/lib/debug/lib/libnsl-2.12.1.so...done.
done.
Loaded symbols for /lib/libnsl.so.1
Reading symbols from /lib/libnss_nis.so.2...Reading symbols from /usr/lib/debug/lib/libnss_nis-2.12.1.so...done.
done.
Loaded symbols for /lib/libnss_nis.so.2
Reading symbols from /lib/libnss_files.so.2...Reading symbols from /usr/lib/debug/lib/libnss_files-2.12.1.so...done.
done.
Loaded symbols for /lib/libnss_files.so.2
Core was generated by `./tcltest'.
Program terminated with signal 6, Aborted.
#0  0x00007f62a7151ba5 in raise (sig=<value optimized out>) at ../nptl/sysdeps/unix/sysv/linux/raise.c:64
64	../nptl/sysdeps/unix/sysv/linux/raise.c: No such file or directory.
	in ../nptl/sysdeps/unix/sysv/linux/raise.c
(gdb) bt 10
#0  0x00007f62a7151ba5 in raise (sig=<value optimized out>) at ../nptl/sysdeps/unix/sysv/linux/raise.c:64
#1  0x00007f62a71556b0 in abort () at abort.c:92
#2  0x0000000000457179 in Tcl_PanicVA (format=0x597772 "%s", argList=0x7fff1a2d38e0) at /home/mig/DEVEL/tcl-core/tmp/generic/tclPanic.c:115
#3  0x000000000045723e in Tcl_Panic (format=0x597772 "%s") at /home/mig/DEVEL/tcl-core/tmp/generic/tclPanic.c:144
#4  0x0000000000419d9e in TestpanicCmd (dummy=0x0, interp=0xe3dd70, argc=1, argv=0xe421b0) at /home/mig/DEVEL/tcl-core/tmp/generic/tclTest.c:4490
#5  0x00000000004c1671 in TclInvokeStringCommand (clientData=0xea5ea0, interp=0xe3dd70, objc=1, objv=0xe42198)
    at /home/mig/DEVEL/tcl-core/tmp/generic/tclBasic.c:2334
#6  0x00000000004c40c4 in TclNREvalObjv (interp=0xe3dd70, objc=1, objv=0xe42198, flags=2097152, cmdPtr=0xea5ea0)
    at /home/mig/DEVEL/tcl-core/tmp/generic/tclBasic.c:4273
#7  0x000000000054dc4a in TEBCresume (data=0xe848e8, interp=0xe3dd70, result=0) at /home/mig/DEVEL/tcl-core/tmp/generic/tclExecute.c:2789
#8  0x00000000004c424a in TclNRRunCallbacks (interp=0xe3dd70, result=0, rootPtr=0x0) at /home/mig/DEVEL/tcl-core/tmp/generic/tclBasic.c:4315
#9  0x00000000004c6be5 in TclEvalObjEx (interp=0xe3dd70, objPtr=0x0, flags=131072, invoker=0x0, word=0)
    at /home/mig/DEVEL/tcl-core/tmp/generic/tclBasic.c:5882
(More stack frames follow...)
(gdb) f 8
#8  0x00000000004c424a in TclNRRunCallbacks (interp=0xe3dd70, result=0, rootPtr=0x0) at /home/mig/DEVEL/tcl-core/tmp/generic/tclBasic.c:4315
4315		result = procPtr(callbackPtr->data, interp, result);
(gdb) p *callbackPtr
$1 = {procPtr = 0x54b771 <TEBCresume>, data = {0xe42110, 0x0, 0x0, 0x0}, nextPtr = 0xe85690}
(gdb) p *callbackPtr->nextPtr
$2 = {procPtr = 0x462c42 <InterpProcNR2>, data = {0xe85bd0, 0x463119, 0x0, 0x0}, nextPtr = 0xe856f0}
(gdb) p *callbackPtr->nextPtr->nextPtr
$3 = {procPtr = 0x4c42d2 <NRCommand>, data = {0xed52f0, 0x0, 0x0, 0x0}, nextPtr = 0xe87310}
(gdb) p *((Command *)callbackPtr->nextPtr->nextPtr->data[0])
$4 = {hPtr = 0xed6cf0, nsPtr = 0xe28730, refCount = 3, cmdEpoch = 0, compileProc = 0, objProc = 0x462a19 <TclObjInterpProc>, 
  objClientData = 0xe9be70, proc = 0x4c1693 <TclInvokeObjectCommand>, clientData = 0xed52f0, deleteProc = 0x4631c2 <TclProcDeleteProc>, 
  deleteData = 0xe9be70, flags = 0, importRefPtr = 0x0, tracePtr = 0x0, nreProc = 0x462a57 <TclNRInterpProc>}
(gdb) p *((Proc *)((Command *)callbackPtr->nextPtr->nextPtr->data[0])->clientData)
$5 = {iPtr = 0xed6cf0, refCount = 14845744, cmdPtr = 0x3, bodyPtr = 0x0, numArgs = 4598297, numCompiledLocals = 0, firstLocalPtr = 0xe9be70, 
  lastLocalPtr = 0x4c1693}
(gdb) p *callbackPtr->nextPtr->nextPtr->nextPtr
$6 = {procPtr = 0x54b771 <TEBCresume>, data = {0xe41ff0, 0x1, 0x0, 0x0}, nextPtr = 0xe85c00}
(gdb) p *callbackPtr->nextPtr->nextPtr->nextPtr->nextPtr
$7 = {procPtr = 0x462c42 <InterpProcNR2>, data = {0xe85a20, 0x463119, 0x0, 0x0}, nextPtr = 0xe3d9c0}
(gdb) p *callbackPtr->nextPtr->nextPtr->nextPtr->nextPtr->nextPtr
$8 = {procPtr = 0x4c42d2 <NRCommand>, data = {0xed4ff0, 0x0, 0x0, 0x0}, nextPtr = 0xe85ba0}
(gdb) p *((Command *)callbackPtr->nextPtr->nextPtr->nextPtr->nextPtr->nextPtr)
$9 = {hPtr = 0x4c42d2, nsPtr = 0xed4ff0, refCount = 0, cmdEpoch = 0, compileProc = 0, objProc = 0, objClientData = 0xe85ba0, proc = 0x1, 
  clientData = 0xe9ba70, deleteProc = 0xf, deleteData = 0x7dbea0, flags = 15552240, importRefPtr = 0x0, tracePtr = 0x1, nreProc = 0xe83880}
(gdb) p *((Command *)callbackPtr->nextPtr->nextPtr->nextPtr->nextPtr->nextPtr->data[0])
$10 = {hPtr = 0xecdbd0, nsPtr = 0xe28730, refCount = 3, cmdEpoch = 0, compileProc = 0, objProc = 0x462a19 <TclObjInterpProc>, 
  objClientData = 0xe9b970, proc = 0x4c1693 <TclInvokeObjectCommand>, clientData = 0xed4ff0, deleteProc = 0x4631c2 <TclProcDeleteProc>, 
  deleteData = 0xe9b970, flags = 0, importRefPtr = 0x0, tracePtr = 0x0, nreProc = 0x462a57 <TclNRInterpProc>}
(gdb) p *((Proc *)((Command *)callbackPtr->nextPtr->nextPtr->nextPtr->nextPtr->nextPtr->data[0]))
$11 = {iPtr = 0xecdbd0, refCount = 14845744, cmdPtr = 0x3, bodyPtr = 0x0, numArgs = 4598297, numCompiledLocals = 0, firstLocalPtr = 0xe9b970, 
  lastLocalPtr = 0x4c1693}
(gdb) p *((Proc *)((Command *)callbackPtr->nextPtr->nextPtr->nextPtr->nextPtr->nextPtr->data[0])->objClientData)
$12 = {iPtr = 0xe3dd70, refCount = 2, cmdPtr = 0xed4ff0, bodyPtr = 0xe859c0, numArgs = 0, numCompiledLocals = 0, firstLocalPtr = 0x0, 
  lastLocalPtr = 0x0}
(gdb) p *((Proc *)((Command *)callbackPtr->nextPtr->nextPtr->nextPtr->nextPtr->nextPtr->data[0])->objClientData)->bodyPtr
$13 = {refCount = 1, bytes = 0xec8100 "sum", length = 3, typePtr = 0x7dbea0, internalRep = {longValue = 15554800, 
    doubleValue = 7.6850923079314217e-317, otherValuePtr = 0xed58f0, wideValue = 15554800, twoPtrValue = {ptr1 = 0xed58f0, ptr2 = 0xe85cf0}, 
    ptrAndLongRep = {ptr = 0xed58f0, value = 15228144}}}
(gdb)