#966: segfault in Parrot_string_mark
-------------------+--------------------------------------------------------
Reporter: coke | Owner: bacek
Type: bug | Status: new
Priority: major | Milestone:
Component: core | Version: trunk
Severity: fatal | Keywords:
Lang: tcl | Patch:
Platform: |
-------------------+--------------------------------------------------------
Changes (by bacek):
* owner: whiteknight => bacek
Comment:
Hello.
Just for future references - minimal tcl testcase:
{{{
if {[lsearch [namespace children] ::tcltest] == -1} {
package require tcltest
namespace import -force ::tcltest::*
}
test obj-32.1 {freeing very large object trees} {
set x {}
for {set i 0} {$i<100000} {incr i} {
set x [list $x {}]
}
unset x
} {}
}}}
I'm looking at this bug for GC-related failures.
--
Bacek
--
Ticket URL: <https://trac.parrot.org/parrot/ticket/966#comment:9>
Parrot <https://trac.parrot.org/parrot/>
Parrot Development
_______________________________________________
parrot-tickets mailing list
[email protected]
http://lists.parrot.org/mailman/listinfo/parrot-tickets
