pike.git/ src/ gc.c

2001-03-28

2001-03-28 10:02:45 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• aad99b76ce4fa7da4e3b4354ec6cf8d0bd8fdde1 (9 lines) (+6/-3) ^{[ Show | Annotate ]}
  Branch: 7.9

lots of PIKE_RUN_UNLOCKED stuff..

Rev: src/Makefile.in:1.253
Rev: src/backend.cmod:1.13
Rev: src/block_alloc.h:1.28
Rev: src/error.c:1.71
Rev: src/gc.c:1.148
Rev: src/global.h:1.60
Rev: src/main.c:1.119
Rev: src/mapping.c:1.119
Rev: src/modules/Image/encodings/xbm.c:1.14
Rev: src/modules/Parser/html.c:1.132
Rev: src/modules/spider/xml.c:1.39
Rev: src/pike_cpulib.c:1.1
Rev: src/pike_cpulib.h:1.6
Rev: src/pike_error.h:1.11
Rev: src/pike_memory.c:1.103
Rev: src/program.c:1.306
Rev: src/stralloc.c:1.118
Rev: src/svalue.h:1.84

30:      #include "block_alloc.h"    - RCSID("$Id: gc.c,v 1.147 2001/03/22 02:21:15 hubbe Exp $"); + RCSID("$Id: gc.c,v 1.148 2001/03/28 10:02:41 hubbe Exp $");      /* Run garbage collect approximately every time    * 20 percent of all arrays, objects and programs is
962:    m = get_marker(a);   #endif    -  ret = add_ref(m); +  ret=m->refs; +  add_ref(m);    if (m->refs >= *(INT32 *) a)    m->flags |= GC_NOT_REFERENCED;    return ret;
990:    if (m->weak_refs >= *(INT32 *) a)    m->weak_refs = -1;    -  ret = add_ref(m); +  ret=m->refs; +  add_ref(m);    if (m->refs >= *(INT32 *) a)    m->flags |= GC_NOT_REFERENCED;    return ret;