pike.git / src / testsuite.in

version» Context lines:

pike.git/src/testsuite.in:1: - test_true([["$Id: testsuite.in,v 1.709 2004/03/18 14:53:18 grubba Exp $"]]); + test_true([["$Id: testsuite.in,v 1.710 2004/04/01 17:05:29 grubba 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:10128:    }    string file=combine_path(dir,s);    mixed stat=file_stat(file);    if(!stat) continue;    if(stat[1]==-2 && has_suffix(file, ".pmod"))    {    test_resolv(file, base_size, handler);    test_dir(file, base_size, handler);    }    else if(stat[1]>=0){ -  // werror("Testing file %O\n", file); +  // DEBUG +  if (lower_case(uname()->sysname||"") == "osf1") { +  werror("Testing file %O...\n", file); +  }    if(has_suffix(file, ".pike") || has_suffix(file, ".pmod") ||    has_suffix(file, ".so"))    {   #if 0    mixed err=catch { (program)file; };    if (err)    {    werror("test: failed to compile %O\n",file);    ok=0;    continue;
pike.git/src/testsuite.in:10160:    if (err = catch{    program ret = load_module(file);    master()->programs[file] = ret;    }) {    werror("test: failed to load %O: %s\n",    file, describe_error(err));    ok=0;    } else   #endif /* constant(load_module) */    { +  // "XX" pads suffix to 4 characters.    test_resolv(file+"XX", base_size, handler);    }    } else {    test_resolv(file, base_size, handler);    }    }    }    }   }   int a()   {    Array.map(master()->pike_module_path,test_dir); -  foreach(({"0.6","7.0","7.2"}),string ver) { +  // FIXME: Forward compatibility? +  foreach(({"0.6","7.0","7.2","7.4"}),string ver) {    object handler = master()->get_compilation_handler(@(array(int))(ver/"."));    Array.map(handler->pike_module_path,test_dir,0,handler);    }    return ok;   }   ]])      // - modifiers, compile time type checks      test_compile_any(class A {int v;} class B {inherit A; int v;})