pike.git/ src/ testsuite.in

2001-07-05

2001-07-05 01:44:56 by Martin Stjernholm <mast@lysator.liu.se>

• fcb322f30ff6fe104694359a1d5944350719ea32 (21 lines) (+20/-1) ^{[ Show | Annotate ]}
  Branch: 7.9

Fixed gc bug when things in partly weak mappings were freed in the zap weak
pass.

Rev: src/gc.c:1.167
Rev: src/gc.h:1.83
Rev: src/svalue.c:1.112
Rev: src/testsuite.in:1.441

1: - test_true([["$Id: testsuite.in,v 1.440 2001/07/04 13:19:11 grubba Exp $"]]); + test_true([["$Id: testsuite.in,v 1.441 2001/07/05 01:44:55 mast Exp $"]]);      cond([[all_constants()->_verify_internals]],   [[
3918:    return sizeof (m);    ]], 1)    +  test_do([[ +  mapping m = set_weak_flag (([]), Pike.WEAK_INDICES); +  object o = class {object o;}(); +  m[o] = ({1}); +  o->o = o; +  o = 0; +  gc(); +  ]]) +  +  test_do([[ +  mapping m = set_weak_flag (([]), Pike.WEAK_INDICES); +  object o = class {object o;}(); +  m[o] = ({1}); +  array a = set_weak_flag (({class (object o) {} (o)}), 1); +  o = 0; +  gc(); +  ]]) +     test_any([[    return class {    mapping x;