The following block of code results in an assertion failure (ptr->ref_count <= 0).
use 'unit-test.
test ::= Module clone.
unit-test TestModule inject (test).
callCC {
escapable.
test addTest 'name1 do { return "This is stupid and don't do this.". }.
}.
test runTests.
This block of code is clearly an infinite loop and could possibly overflow the call stack (though I doubt it), but it should certainly not be causing issues with the reference counter.
The following block of code results in an assertion failure (
ptr->ref_count <= 0
).This block of code is clearly an infinite loop and could possibly overflow the call stack (though I doubt it), but it should certainly not be causing issues with the reference counter.