pike.git/ src/ testsuite.in

2001-09-05

2001-09-05 03:54:00 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• 9e6d45b5d9bbab281c749cc7df020beac4efd004 (45 lines) (+44/-1) ^{[ Show | Annotate ]}
  Branch: 7.9

bugfix for an obscure mapping bug (thanks to Mast for pointing this out)

Rev: src/mapping.c:1.135
Rev: src/testsuite.in:1.450

1: - test_true([["$Id: testsuite.in,v 1.449 2001/08/16 04:33:32 mast Exp $"]]); + test_true([["$Id: testsuite.in,v 1.450 2001/09/05 03:54:00 hubbe Exp $"]]);      cond([[all_constants()->_verify_internals]],   [[
2621:      define([[MTEST]])    + test_do([[ +  + class X { + mapping gurka; +  + class Tomat + { +  int `==(mixed x) +  { +  /* make hash bigger */ +  for(int e=sizeof(gurka);e<1000;e++) gurka[e]=e; +  return 0; +  } +  +  int __hash() +  { +  return 99999; +  } + }; +  + class Sallad + { +  int __hash() +  { +  return 99999; +  } + }; +  + void create() + { +  for(int x=1;x<255;x++) +  { +  gurka=([]); +  for(int e=0;e<x;e++) gurka[~e]=e; +  gurka[Sallad()]=-2; +  gurka[Tomat()]=-3; +  } + } + }(); +  + ]]) +    test_equal([[ `+( ([1:2]) )]],[[ ([1:2]) ]])   test_false( `+( ([1:2]) ) == ([1:2]) )   test_equal([[ `+( ([1:2]), ([1:2]) )]],[[ ([1:2]) ]])