All pastes #423089 Raw Edit

TclInitCompiledLocal

public text v1 · immutable
·published 2007-04-03 22:01 UTC
rendered paste body
(gdb) up
#1  0x00000036f782fa1e in abort () from /lib64/tls/libc.so.6
(gdb) up
#2  0x0000000000a57bd5 in Tcl_PanicVA (format=0xb58bf8 "body object for proc attached to frame is not a byte code type", argList=0x7fbfffa4c0) at /tmp/brlcad/src/other/tcl/unix/../generic/tclPanic.c:103
103             abort();
(gdb) up
#3  0x0000000000a57caf in Tcl_Panic (format=0xb58bf8 "body object for proc attached to frame is not a byte code type") at /tmp/brlcad/src/other/tcl/unix/../generic/tclPanic.c:132
132         Tcl_PanicVA(format, argList);
(gdb) up
#4  0x0000000000a6556e in TclInitCompiledLocals (interp=0xddf6c0, framePtr=0x7fbfffa658, nsPtr=0x1526d50) at /tmp/brlcad/src/other/tcl/unix/../generic/tclProc.c:1111
1111            Tcl_Panic("body object for proc attached to frame is not a byte code type");
(gdb) l
1106        ByteCode *codePtr;
1107        CompiledLocal *localPtr = framePtr->procPtr->firstLocalPtr;
1108    
1109        bodyPtr = framePtr->procPtr->bodyPtr;
1110        if (bodyPtr->typePtr != &tclByteCodeType) {
1111            Tcl_Panic("body object for proc attached to frame is not a byte code type");
1112        }
1113        codePtr = (ByteCode *) bodyPtr->internalRep.otherValuePtr;
1114    
1115        InitCompiledLocals(interp, codePtr, localPtr, varPtr, nsPtr);
(gdb) p *bodyPtr
$17 = {refCount = 1, bytes = 0x1560b30 "@Archetype-init", length = 15, typePtr = 0x0, internalRep = {longValue = 22167024, doubleValue = 1.0951965028938412e-316, otherValuePtr = 0x1523df0, 
    wideValue = 22167024, twoPtrValue = {ptr1 = 0x1523df0, ptr2 = 0x0}, ptrAndLongRep = {ptr = 0x1523df0, value = 0}}}