Tcl Source Code

Check-in [d6d4b18fc1]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:[fc1409fc91]: TclOO method with non-literal value for body argument causes segmentation fault
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | bug-fc1409fc91
Files: files | file ages | folders
SHA3-256: d6d4b18fc17d61dc61baa70723b266a43112e33a8e509d18fa7ac3684243f83e
User & Date: pooryorick 2017-10-24 08:38:17
Original Comment: fix fc1409fc91: TclOO method with non-literal value for body argument causes segmentation fault
Context
2017-10-24
11:23
Added test case. check-in: efdb206a73 user: dkf tags: bug-fc1409fc91
08:38
[fc1409fc91]: TclOO method with non-literal value for body argument causes segmentation fault check-in: d6d4b18fc1 user: pooryorick tags: bug-fc1409fc91
2017-10-23
17:10
Update TZ info to tzcode2017c. check-in: 9fd28af657 user: jima tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to generic/tclOOMethod.c.

1310
1311
1312
1313
1314
1315
1316

1317
1318
1319
1320
1321
1322
1323

    /*
     * Must strip the internal representation in order to ensure that any
     * bound references to instance variables are removed. [Bug 3609693]
     */

    bodyObj = Tcl_DuplicateObj(pmPtr->procPtr->bodyPtr);

    TclFreeIntRep(bodyObj);

    /*
     * Create the actual copy of the method record, manufacturing a new proc
     * record.
     */








>







1310
1311
1312
1313
1314
1315
1316
1317
1318
1319
1320
1321
1322
1323
1324

    /*
     * Must strip the internal representation in order to ensure that any
     * bound references to instance variables are removed. [Bug 3609693]
     */

    bodyObj = Tcl_DuplicateObj(pmPtr->procPtr->bodyPtr);
    Tcl_GetString(bodyObj);
    TclFreeIntRep(bodyObj);

    /*
     * Create the actual copy of the method record, manufacturing a new proc
     * record.
     */