pike.git / src / gc.c

version» Context lines:

pike.git/src/gc.c:3866:    if (o->prog) {    INT_TYPE line;    struct pike_string *file = get_program_line (o->prog, &line);    fprintf(stderr, ", prog %s:%d\n", file->str, line);    free_string(file);    }    else fputs(", is destructed\n", stderr);    );    if (!SAFE_IS_ZERO(&gc_destruct_cb)) {    ref_push_object(o); -  safe_apply_svalue(&gc_destruct_cb, 1, 1); +  push_int(reason); +  push_int(o->refs - 1); +  safe_apply_svalue(&gc_destruct_cb, 3, 1);    pop_stack();    }       destruct_object (o, reason);    free_object(o);    gc_free_extra_ref(o);   #if defined (PIKE_DEBUG) || defined (DO_PIKE_CLEANUP)    destroy_count++;   #endif    really_free_gc_rec_frame (kill_list);