pike.git/ src/ testsuite.in

1999-06-03

1999-06-03 06:10:03 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• 4743f8f8e826ae827ab47834c447b722640eebfc (47 lines) (+43/-4) ^{[ Show | Annotate ]}
  Branch: 7.9

signal and child handling fixed on linux + testsuite tests for those fixes

Rev: src/signal_handler.c:1.135
Rev: src/signal_handler.h:1.9
Rev: src/testsuite.in:1.174
Rev: src/threads.c:1.98

1: - stest_true([["$Id: testsuite.in,v 1.173 1999/06/02 18:59:38 grubba Exp $"]]) + stest_true([["$Id: testsuite.in,v 1.174 1999/06/03 06:10:02 hubbe Exp $"]])   cond([[all_constants()->_verify_internals]],   [[    test_do(_verify_internals())
3230:      cond([[ file_stat("/bin/cat") && file_stat("/dev/null") && all_constants()->thread_create && (cpp("__NT__")/"\n")[1]=="__NT__" ]],   [[ +  test_do([[    for(int q=0;q<100;q++)    { -  Threads.Fifo fifo=Threads.Fifo(); +  array fnord=({}); +  Thread.Fifo fifo=Thread.Fifo();       for(int e=0;e<10;e++)    { -  thread_create(lamba() { +  fnord+=({ thread_create(lambda() {    Process.create_process(({"/bin/cat","/dev/null"}));    fifo->read(); -  }); +  }) });    }    for(int e=0;e<50;e++) Stdio.Port()->bind(0);    for(int e=0;e<10;e++) fifo->write(1); -  +  fnord->wait();    }    ]]) -  + ]])    -  + cond([[ file_stat("/bin/sleep") && all_constants()->thread_create && (cpp("__NT__")/"\n")[1]=="__NT__" ]], + [[ + test_any([[ +  class Fnord +  { + int gnapp(int t) + { +  int e; +  for(e=0;e<7;e++) +  { +  for(int d=0;d<150;d++) +  { +  object o=Process.create_process(({"/bin/sleep","99999"})); +  kill( o->pid(), 9 ); +  o->wait(); +  } + // werror("%d",t); +  } +  return -1; + }    -  + array start() + { +  array a=({}); +  for(int e=0;e<10;e++) +  a+=({thread_create(gnapp,e)}); +  return a; + } + }; +  + return Fnord()->start()->wait()-({ -1 }); + ]],[[ ({}) ]]) + ]]) +  +    test_equal(Array.splice(({7,8,99}),({"h","h",99})),    ({7,"h",8,"h",99,99}))   test_equal(Array.splice(({7,8}),({"h","h",99})),