pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1:   /* -*- Pike -*-    * -  * $Id: master.pike.in,v 1.146 2001/03/12 10:51:27 hubbe Exp $ +  * $Id: master.pike.in,v 1.147 2001/03/14 21:44:04 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:2045:    end = 1;       mapping(string:int) prev_pos = ([]);    array(string) frames = ({});    int loop_start = 0, loop_next, loops;       for(e = sizeof(trace)-1; e>=end; e--)    {    mixed tmp;    string row; -  // The continue's below jump wrong when this catch is here.. :P - // if (mixed err=catch { +  if (mixed err=catch {    tmp = trace[e];    if(stringp(tmp))    {    row=tmp;    }    else if(arrayp(tmp))    {    string pos;    if(sizeof(tmp)>=2 && stringp(tmp[0])) {    if (intp(tmp[1])) {
pike.git/lib/master.pike.in:2146:    }    else    {    if (tmp) {    if (catch (row = sprintf("%O", tmp)))    row = describe_program(object_program(tmp)) + " with broken _sprintf()";    } else {    row = "Destructed object";    }    } - // }) { - // row = sprintf("Error indexing backtrace line %d: %s (%O)!", e, err[0], err[1]); - // } +  }) { +  row = sprintf("Error indexing backtrace line %d: %s (%O)!", e, err[0], err[1]); +  }    frames += ({row + "\n"});    }       if (loop_start) {    // Want tail to contain a full loop rather than being empty; it    // looks odd when the repeat message ends the backtrace.    array(string) tail = frames[loop_start + sizeof (frames) ..    loop_next - 1 + sizeof (frames)];    if (loops)    frames += ({sprintf ("... last %d frames above repeated %d times ...\n",