Tcl Source Code

View Ticket
Bounty program for improvements to Tcl and certain Tcl packages.
Ticket UUID: 6bca38d59b1f9c11272beb130b37e0fadcfbe1ab
Title: TclOO segmentation fault cleaning up objects that that have mixed themselves into themselves.
Type: Bug Version: core-8-5-branch
Submitter: pooryorick Created on: 2017-11-29 11:53:26
Subsystem: 35. TclOO Package Assigned To: nobody
Priority: 5 Medium Severity: Minor
Status: Closed Last Modified: 2017-11-29 12:06:07
Resolution: Fixed Closed By: pooryorick
    Closed on: 2017-11-29 12:06:07

With a tclsh built with --enable-symbols=all or (mem), the following snippet triggers a segmentation fault in ReleaseClassContents():

oo::class create obj

oo::copy obj obj1 obj1
oo::objdefine obj1 {
	mixin obj1 obj
oo::copy obj1 obj2
oo::objdefine obj2 {
	mixin obj2 obj1
rename obj2 {}
rename obj1 {}

User Comments: pooryorick added on 2017-11-29 12:06:07:

Fixed in [313a7c1b8a91].