pike.git / src / testsuite.in

version» Context lines:

pike.git/src/testsuite.in:1: - test_true([["$Id: testsuite.in,v 1.683 2003/10/04 18:21:51 grubba Exp $"]]); + test_true([["$Id: testsuite.in,v 1.684 2003/10/05 13:25:34 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:9803:    prg, describe_error(err));    ok=0;    }   }      void test_dir(string dir, int|void base_size, object|void handler)   {    if (!Stdio.is_dir (dir)) return;    // werror("Testing directory %O...\n", dir);    if(!base_size) base_size=sizeof(dir); -  foreach(get_dir(dir), string s) +  array(string) files = get_dir(dir); +  // Ensure that .so files are loaded before .pike and .pmod files. +  // Otherwise their loading errors will be hidden. +  sort(reverse(files[*]), files); +  files = reverse(files); +  foreach(files, string s)    {    switch(s)    {   #if !constant(GTK.Window)    case "GTKSupport.pmod":    case "PV.pike":    case "pv.pike":   #endif    continue; // These modules cannot be tested properly by this test    }
pike.git/src/testsuite.in:9837:   #if 0    mixed err=catch { (program)file; };    if (err)    {    werror("test: failed to compile %O\n",file);    ok=0;    continue;    }   #endif    if (has_suffix(file, ".so")) { +  if (!master()->programs[file]) { +  // Clear any negative cache entry. +  m_delete(master()->programs, file); +  }   #if constant(load_module)    // Load .so files by hand to make sure    // loading errors aren't hidden.    mixed err;    if (err = catch{    program ret = load_module(file);    master()->programs[file] = ret;    }) {    werror("test: failed to load %O: %s\n",    file, describe_error(err));