pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1:   /* -*- Pike -*-    * -  * $Id: master.pike.in,v 1.107 2000/03/25 21:28:37 hubbe Exp $ +  * $Id: master.pike.in,v 1.108 2000/03/26 15:11:34 mast 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:1324:    return "mapping["+sizeof(m)+"]";       case "multiset":    if(!sizeof(m)) return "(<>)";    return "multiset["+sizeof(m)+"]";       case "function":    if(string tmp=describe_program(m)) return tmp;    if(object o=function_object(m))    return (describe_object(o)||"")+"->"+function_name(m); -  else -  return function_name(m) || "function"; +  else { +  string tmp; +  if (catch (tmp = function_name(m))) +  // The function object has probably been destructed. +  return "function"; +  return tmp || "function"; +  }       case "program":    if(string tmp=describe_program(m)) return tmp;    return typ;       default:    if (objectp(m))    if(string tmp=describe_object(m)) return tmp;    return typ;    }
pike.git/lib/master.pike.in:1578:    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 (%O)!", e, err[1]); +  row += sprintf("Error indexing backtrace line %d: %s (%O)!", e, err[0], err[1]);    }    ret += row + "\n";    }    }       return ret;   }      // Returns a short description of a backtrace, containing only the   // error message.