pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1535:   {    // werror("Unregistering %O...\n", p);    if(string fname=rev_programs[p] || search(programs,p)) {    resolv_debug("unregister %s\n", fname);    if (m_delete (rev_programs, p))    m_delete (programs, fname);    else    programs[fname] = no_value;       string name = program_path_to_name (fname); -  mixed n = has_value (name, ".") ? +  mixed n = has_value (name, '.') ?    resolv ((name / ".")[..<1] * ".") :    get_root_module();    if (objectp (n) && (n->is_resolv_dirnode || n->is_resolv_joinnode))    n->delete_value (p);       fname = dirname (fname);    if ( fname!="" && objectp (n = fc[fname]) )    if (n->is_resolv_dirnode) // Won't find joinnodes in fc.    n->delete_value (p);    }
pike.git/lib/master.pike.in:2315:    string|void name)   {    constant is_resolv_joinnode = 1;       mapping(string:mixed) cache=([]);       protected string _sprintf(int as)    {    if (as != 'O') return 0;    if (name) { -  if (has_value (name, "|")) +  if (has_value (name, '|'))    return "joinnode(" + name + ")";    else    return name; // Let's be brief.    }    else    return sprintf("master()->joinnode(%O)", joined_modules);    }       protected void create()    {
pike.git/lib/master.pike.in:2356:    }       resolv_debug ("joinnode(%O) created with name %O\n", joined_modules, name);    }       void add_path(string path)    {    path = combine_path(getcwd(), path);    dirnode node = fc[path] ||    (fc[path] = dirnode(path, compilation_handler, -  name && !has_value (name, "|") && name)); +  name && !has_value (name, '|') && name));    if (sizeof(joined_modules) &&    joined_modules[0] == node) return;    joined_modules = ({ node }) + (joined_modules - ({ node }));    cache = ([]);    }       void rem_path(string path)    {    path = combine_path(getcwd(), path);    joined_modules = filter(joined_modules,
pike.git/lib/master.pike.in:2405:    return (ret);    }    }    }       if (sizeof(res)) {    DEC_RESOLV_MSG_DEPTH();    resolv_debug("joinnode(%O)->ind(%O) => new joinnode, fallback: %O\n",    joined_modules, index, fallback_module[index]);    return joinnode(res, compilation_handler, fallback_module[index], -  name && !has_value (name, "|") && +  name && !has_value (name, '|') &&    (name == "predef::" ? index : name + "." + index));    }       DEC_RESOLV_MSG_DEPTH();    resolv_debug ("joinnode(%O)->ind(%O) => not found. Trying fallback %O\n",    joined_modules, index, fallback_module);    return fallback_module[index];    }       protected mixed `[]=(string index, mixed value)