pike.git / src / testsuite.in

version» Context lines:

pike.git/src/testsuite.in:1:   START_MARKER - test_true([["$Id: testsuite.in,v 1.728 2004/05/27 19:01:20 mast Exp $"]]); + test_true([["$Id: testsuite.in,v 1.729 2004/05/27 19:03:21 mast Exp $"]]);      // This triggered a bug only if run sufficiently early.   test_compile_any([[#pike 7.2]])   test_compile_any([[#pike 7.4]])   test_compile_any([[#pike 7.0]])   test_compile_any([[#pike 0.6]])      cond([[all_constants()->_verify_internals]],   [[    test_do(_verify_internals())
pike.git/src/testsuite.in:7576:   mixed a() {return functionp(X(Y));}   ")()->a()]])   test_false([[compile_string(#"   #define Y z   #define X(x) x()   int z() {return 0;}   mixed a() {return functionp(X(Y));}   ")()->a()]])      test_do([[ -  Stdio.write_file("testsuite_test.pmod", "#error foo"); +  Stdio.write_file("testsuite_test.pmod", "syntax error");    object orig_master = master();    replace_master(object_program(orig_master)());    mixed err = catch {    compile_string(#"   #ifdef NONEXISTING_DEFINE   #error Not expected   #if constant (.testsuite_test)   #error Not expected either   #endif   #endif", "testsuite_test");    };    replace_master(orig_master);    if (err) throw (err);   ]]);      test_do([[ -  Stdio.write_file("testsuite_test.pmod", "#error foo"); +  Stdio.write_file("testsuite_test.pmod", "syntax error");    object orig_master = master();    replace_master(object_program(orig_master)());    mixed err = catch {    compile_string(#"   #if defined (NONEXISTING_DEFINE) && constant (.testsuite_test)   #error Not expected   #endif", "testsuite_test");    };    replace_master(orig_master);    if (err) throw (err);