pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1:   // -*- Pike -*-   //   // Master Control Program for Pike.   //   // This file is part of Pike. For copyright information see COPYRIGHT.   // Pike is distributed under GPL, LGPL and MPL. See the file COPYING   // for more information.   // - // $Id: master.pike.in,v 1.335 2004/03/05 13:42:56 nilsson Exp $ + // $Id: master.pike.in,v 1.336 2004/03/15 13:04:55 mast Exp $      #pike __REAL_VERSION__   //#pragma strict_types      // Some programs destroys character pairs beginning with the currency   // symbol when running in chinese locale.   #if "ยค/" != "\244/"   #error "master.pike.in is corrupted."   #endif   
pike.git/lib/master.pike.in:3297:       else if (arrayp(trace)) {    if (sizeof([array]trace)==2 && stringp(ret = ([array]trace)[0])) {    trace = ([array] trace)[1];    if(!trace)    return ret + "<No backtrace>\n";    else if (!arrayp (trace))    return sprintf ("%s<Backtrace in error array is %t, expected array>\n",    ret, trace);    } +  else +  ret = "";    }       else    return sprintf ("<Invalid backtrace/error container: %O>\n", trace);       {    Describer desc = Describer();    array trace = [array]trace;       int end = 0;