Tcl package Thread source code

Ticket Change Details

Artifact ID: 82ae3a98f92c02403f36a16a6fd66447ad3b275e23360a066b6f9325bf49d0ac
Ticket: 76f47e0376fb8b2783627799fd7f2adab66d98f9
thread::send -async script varname aborts with "alloc: invalid block"
User & Date: pooryorick 2018-07-17 06:15:10

  1. Change assignee to "nobody"
  2. Change closer to "nobody"
  3. Change cmimetype to "text/x-fossil-wiki"
  4. Change comment to:

    With a Tcl compiled with --enable-symbols , the script

    package require Thread
    set t1 [thread::create]
    thread::send -async $t1 {lindex {}} [expr 0]

    results in:

    alloc: invalid block

    This happens because threadSendFree obtains the length of a Tcl_Obj before the string representation for that object is generated, and a few lines later the string representation is generated.

  5. Change foundin to "trunk1"
  6. Change is_private to "0"
  7. Change login to "pooryorick"
  8. Change priority to "5 Medium"
  9. Change resolution to "None"
  10. Change severity to "Minor"
  11. Change status to "Open"
  12. Change submitter to "pooryorick"
  13. Change subsystem to "80. Thread Package"
  14. Change title to:

    thread::send -async script varname aborts with "alloc: invalid block"

  15. Change type to "Bug"