Tcl Source Code

Check-in [417d67fc63]
Login

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

Overview
Comment:Fix for [ee08ed090b0a5408], sporadic segmentation fault in coroutine.test/coroutine-7.4.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | core-8-branch
Files: files | file ages | folders
SHA3-256: 417d67fc63d237b7b22f526f4f50cb4bbf565dccba67877a526160449023b3b2
User & Date: pooryorick 2023-01-26 23:55:30
References
2023-01-27
00:06 Pending ticket [ee08ed090b]: sporadic segmentation fault in coroutine.test/coroutine-7.4 plus 5 other changes artifact: e83aa2fa8a user: pooryorick
Context
2023-01-27
08:17
Update fcopy documentation regarding -size argument check-in: 173a6cb112 user: jan.nijtmans tags: core-8-branch
00:46
Merge 8.7 check-in: f118b6370b user: pooryorick tags: trunk, main
2023-01-26
23:55
Fix for [ee08ed090b0a5408], sporadic segmentation fault in coroutine.test/coroutine-7.4. check-in: 417d67fc63 user: pooryorick tags: core-8-branch
2023-01-25
10:02
Test TableFromUtfProc() with strict handling of encoding errors. check-in: 21ded00dfb user: pooryorick tags: core-8-branch
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to generic/tclBasic.c.

10516
10517
10518
10519
10520
10521
10522

10523
10524
10525
10526
10527
10528
10529

    corPtr->running.framePtr = iPtr->rootFramePtr;
    corPtr->running.varFramePtr = iPtr->rootFramePtr;
    corPtr->running.cmdFramePtr = NULL;
    corPtr->running.lineLABCPtr = corPtr->lineLABCPtr;
    corPtr->stackLevel = NULL;
    corPtr->auxNumLevels = 0;


    /*
     * Create the coro's execEnv, switch to it to push the exit and coro
     * command callbacks, then switch back.
     */

    corPtr->eePtr = TclCreateExecEnv(interp, CORO_STACK_INITIAL_SIZE);







>







10516
10517
10518
10519
10520
10521
10522
10523
10524
10525
10526
10527
10528
10529
10530

    corPtr->running.framePtr = iPtr->rootFramePtr;
    corPtr->running.varFramePtr = iPtr->rootFramePtr;
    corPtr->running.cmdFramePtr = NULL;
    corPtr->running.lineLABCPtr = corPtr->lineLABCPtr;
    corPtr->stackLevel = NULL;
    corPtr->auxNumLevels = 0;
    corPtr->yieldPtr = NULL;

    /*
     * Create the coro's execEnv, switch to it to push the exit and coro
     * command callbacks, then switch back.
     */

    corPtr->eePtr = TclCreateExecEnv(interp, CORO_STACK_INITIAL_SIZE);