Branch: Tag:

1997-04-23

1997-04-23 02:00:48 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

more tests added

Rev: src/configure.in:1.92
Rev: src/language.yacc:1.38
Rev: src/modules/call_out/Makefile.in:1.5
Rev: src/modules/call_out/call_out.c:1.10
Rev: src/modules/call_out/test_co.pike:1.1
Rev: src/modules/dynamic_module_makefile.in:1.12
Rev: src/modules/files/Makefile.in:1.5
Rev: src/modules/files/socktest.pike:1.2
Rev: src/modules/static_module_makefile.in:1.11
Rev: src/testsuite.in:1.39

1: - test_true([["$Id: testsuite.in,v 1.38 1997/04/22 00:10:16 grubba Exp $"]]) + test_true([["$Id: testsuite.in,v 1.39 1997/04/23 01:59:41 hubbe Exp $"]])   test_any([[class foo { constant x=17; }; class bar { inherit foo; constant x=18; }; return bar()->x;]],18)   test_program([[inline string foo(string s){ while(s[0] == ' ' || s[0] == '\t') s = s[1..]; return(s); } string a() { return foo(" bar"); }]])   test_true([[lambda(function f) {return 1;}(object_program(this_object()));]])   test_eq([[class { int `()(){ return 4711; } }()(); ]],4711)   teste_eval_error(mixed foo=({}); sort(@foo); )   test_compile_error([[int foo() { return 1} ; constant foo=(["foo":foo]); return foo->foo();]]) -  + test_compile_error([[class T{void p(object e,object f){lambda::create(f);}}]])   test_eval_error(mixed *foo=({}); return mkmapping(foo,({1})); )   test_true(time())   test_compile_error([[mapping (string:array(string:string)) foo=([]); ]])