pike.git/ src/ testsuite.in

1996-10-05

1996-10-05 03:17:48 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• 6f6eb234688891f6670e5b46a8d32c6be34a9588 (25 lines) (+25/-0) ^{[ Show | Annotate ]}
  Branch: 7.9

tests for threads added

Rev: src/testsuite.in:1.3

54:   test_equal([[lambda() {string *a=({1,2,3,4}); sort(({4,3,2,1}),a); return a; }()]],[[({4,3,2,1})]] )   test_equal([[lambda() {string *a=({1,2,3,4}),*b=a+({}); sort(({4,3,2,1}),a,b); return b; }()]],[[({4,3,2,1})]] )    + cond([[all_efuns()->thread_create]], + [[ + // thread_create +  test_do(thread_create(lambda() { }))    -  + // /precompiled/mutex +  test_true(clone(Mutex)) +  test_true(clone(Mutex)->lock()) +  test_true(clone(Mutex)->trylock()) +  + // /precompiled/condition +  test_true(clone(Condition)) +  test_do(clone(Condition)->signal()) +  test_do(clone(Condition)->broadcast()) +  + // /precompiled/fifo + test_any([[ + #include <fifo.h> + return 0; + ]],0) +  test_do(clone(Fifo)) +  re + ]]) +  +    // m_delete   test_equal(([1:1]),m_delete(a(),0))   test_equal(([1:1]),m_delete(([1:1,0:3]),0))