pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1: - /* $Id: master.pike.in,v 1.28 1998/05/13 07:36:56 hubbe Exp $ + /* $Id: master.pike.in,v 1.29 1998/05/19 20:39:20 hubbe Exp $    *    * Master-file for Pike.    *    * Based on master.pike 1.67.    */      // Some configurable parameters useful for debugging      // Used by describe_backtrace() et al.   #if !defined(BT_MAX_STRING_LEN) || (BT_MAX_STRING_LEN <= 0)
pike.git/lib/master.pike.in:204:    program ret;    array s;    string fname=pname+ext;    if(ret=programs[fname]) return ret;    if( (s=master_file_stat(fname)) && s[1]>=0 )    {    switch(ext)    {    case "":    case ".pike": -  if( (s=master_file_stat(fname+".o")) && s[1]>=0 ) +  if(array s2=master_file_stat(fname+".o"))    { -  +  if(s2[1]>=0 && s2[2]>=s[2]) +  {    mixed err=catch {    return decode_value(_static_modules.files()->Fd(fname+".o","r")->read(),Codec());    };    if(want_warnings)    werror("Failed to decode %s.o\n",fname);    } -  +  }    if ( mixed e=catch { ret=compile_file(fname); } )    {    if(arrayp(e) &&    sizeof(e)==2 &&    arrayp(e[1]) &&    sizeof(e[1]) == sizeof(backtrace()))    e[1]=({});    throw(e);    }    break;