Branch: Tag:

2000-09-01

2000-09-01 20:19:35 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

inherit_list fixed [bug 153 (#153)]

Rev: src/testsuite.in:1.325

1: - test_true([["$Id: testsuite.in,v 1.324 2000/08/27 13:50:37 grubba Exp $"]]); + test_true([["$Id: testsuite.in,v 1.325 2000/09/01 20:19:35 hubbe Exp $"]]);      cond([[all_constants()->_verify_internals]],   [[
626:    "mixed Q() { return "+acc+"();}\n"    "int main() { trace(9); werror(\"%O\\n\","+acc+"()); }\n"    ; +  +  mixed tmp;    mixed err=catch { -  mixed tmp=compile_string(test)(); +  tmp=compile_string(test)();    res=tmp->Q();    if(res != ans)    throw("Test failed");    }; -  +  mixed x=Program.inherit_list(object_program(tmp));    if(err)    {    errors++;