pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1:   /* -*- Pike -*-    * -  * $Id: master.pike.in,v 1.80 1999/12/06 21:59:37 grubba Exp $ +  * $Id: master.pike.in,v 1.81 1999/12/06 22:16:05 grubba Exp $    *    * Master-file for Pike.    *    * Based on master.pike 1.67.    */      // Some configurable parameters useful for debugging      #define PIKE_AUTORELOAD   
pike.git/lib/master.pike.in:1427:    catch    {    linewidth=_static_modules.files()->_stdin->tcgetattr()->columns;    };    }       if((arrayp(trace) && sizeof(trace)==2 && stringp(trace[0])) ||    (objectp(trace) && trace->is_generic_error))    {    if (catch { -  ret = trace[0]; +  ret = trace[0] || "No error message!\n";    trace = trace[1];    }) {    return "Error indexing backtrace!\n";    }    }else{    ret="";    }       if(!arrayp(trace))    {
pike.git/lib/master.pike.in:1496:    if(sizeof(pos)+sizeof(data) < linewidth-4)    {    row=sprintf("%s: %s",pos,data);    }else{    row=sprintf("%s:\n%s",pos,sprintf(" %*-/s",linewidth-6,data));    }    }    }    else    { -  row="Destructed object"; +  if (tmp) { +  row = sprintf("%O", tmp); +  } else { +  row = "Destructed object";    } -  +  }    }) {    row += sprintf("Error indexing backtrace line %d (%O)!", e, err[1]);    }    ret += row + "\n";    }    }       return ret;   }