pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1:   /* -*- Pike -*-    * -  * $Id: master.pike.in,v 1.164 2001/08/15 23:01:00 mast Exp $ +  * $Id: master.pike.in,v 1.165 2001/08/16 00:07:05 mast Exp $    *    * Master-file for Pike.    *    * Based on master.pike 1.67.    */      // Some configurable parameters useful for debugging      #pike __REAL_VERSION__   #define PIKE_AUTORELOAD
pike.git/lib/master.pike.in:432:    {    mixed err=catch {    AUTORELOAD_CHECK_FILE(oname);    return programs[fname] =    decode_value(master_read_file(oname),    Codec());    };    if (handler) {    handler->compile_warning(oname, 0,    sprintf("Decode failed:\n" -  "\t%s", err[0])); +  "\t%s", describe_error(err)));    } else {    compile_warning(oname, 0,    sprintf("Decode failed:\n" -  "\t%s", err[0])); +  "\t%s", describe_error(err)));    }    } else if (out_of_date_warning) {    if (handler) {    handler->compile_warning(oname, 0,    "Compiled file is out of date\n");    } else {    compile_warning(oname, 0, "Compiled file is out of date\n");    }    }    }
pike.git/lib/master.pike.in:460:    programs[fname]=ret=__empty_program();    if ( mixed e=catch {    ret=compile_file(fname,    handler,    ret,    mkobj? (objects[ret]=__null_program()) : 0);    } )    {   // werror("-3: %O\n",fname);    ret=programs[fname]=0; -  if(arrayp(e) && sizeof(e) && e[0] == "Compilation failed.\n") -  e[1]=({}); +     throw(e);    }    break;   #if constant(load_module)    case ".so":    if (fname == "") {    werror(sprintf("low_find_prog(\"%s\", \"%s\") => load_module(\"\")\n"    "%s\n", pname, ext, describe_backtrace(backtrace())));    }