pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:4438:    return res + ind[i] + ".";    }    }    };    }       // We're really out of luck here...    return res + (describe_program(parent_fun)||"unknown_program") + "()->";   }    - //! + //! Function called by @expr{sprintf("%O")@} for objects that don't + //! have an @[lfun::_sprintf()], or have one that returns @expr{UNDEFINED}.   string describe_object(object o)   {    string s;    if(undefinedp (o)) return 0; // Destructed.       // Handled by the search of all_constants() below.    // if (o == _static_modules) return "_static_modules";       program|function(mixed...:void|object) parent_fun = object_program(o);   
pike.git/lib/master.pike.in:4481:    if ((s = programs_reverse_lookup (parent_fun)) &&    (s=program_path_to_name(s, "", "", "()")))    return s;    /* Try identifying the program. */    if(( s=describe_program(parent_fun) ))    return s+"()";       return 0;   }    - //! + //! Function called by @expr{sprintf("%O")@} for programs.   string describe_program(program|function p)   {    string s;    if(!p) return 0;       if (p == object_program (_static_modules))    return "object_program(_static_modules)";       if(programp(p) &&    (s = programs_reverse_lookup ([program] p)) &&
pike.git/lib/master.pike.in:4508:    return describe_module(tmp) + s;    }    }       if(s=Builtin.program_defined(p))    return BASENAME(s);       return search(all_constants(), p);   }    - //! + //! Function called by @[describe_backtrace()] to describe + //! functions in the backtrace.   string describe_function (function f)   {    if (!f) return 0;       string name;       if (name = search(all_constants(), f)) return name;       if(string s = programs_reverse_lookup (f))    {