aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/sc_interp.c7
1 files changed, 4 insertions, 3 deletions
diff --git a/src/sc_interp.c b/src/sc_interp.c
index 86e2329..96efb4e 100644
--- a/src/sc_interp.c
+++ b/src/sc_interp.c
@@ -900,14 +900,15 @@ static void delete_unused_subframes(struct frame *fr)
{
int i;
int done = 1;
+ int start = 0;
do {
- printf("checking %i children of %p\n", fr->num_children, fr);
- for ( i=0; i<fr->num_children; i++ ) {
+ done = 1;
+ for ( i=start; i<fr->num_children; i++ ) {
if ( !fr->children[i]->visited ) {
delete_subframe(fr, fr->children[i]);
done = 0;
- printf("deleting %p\n", fr->children[i]);
+ start = i;
break;
} else {
delete_unused_subframes(fr->children[i]);