pike.git/ src/ testsuite.in

2006-11-07

2006-11-07 20:54:37 by Martin Stjernholm <mast@lysator.liu.se>

• e9ead0ed0ca9558501c40377bfc3e2c77a31be8c (23 lines) (+22/-1) ^{[ Show | Annotate ]}
  Branch: 7.9

Test that destructed indices are skipped by the mapping and multiset
iterators.

Rev: src/testsuite.in:1.770

1:   START_MARKER - test_true([["$Id: testsuite.in,v 1.769 2006/10/28 19:18:08 grubba Exp $"]]); + test_true([["$Id: testsuite.in,v 1.770 2006/11/07 20:54:37 mast Exp $"]]);      // This triggered a bug only if run sufficiently early.   test_compile_any([[#pike 7.2]])
7472:    return 0;   ]], 0)    + test_any([[ +  mapping(object:int) x = ([]); +  object o = class {}(); +  x[o] = 1; +  destruct (o); +  int i; +  foreach (x; object p;) i++; +  return i; + ]], 0) +  + test_any([[ +  multiset(object) x = (<>); +  object o = class {}(); +  x[o] = 1; +  destruct (o); +  int i; +  foreach (x; object p;) i++; +  return i; + ]], 0) +    // do-while   test_any(int e;string t=""; e=0; do{ t+=e; }while(++e<6); return t,"012345";)