pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1: - /* $Id: master.pike.in,v 1.56 1999/09/06 11:02:23 hubbe Exp $ + /* $Id: master.pike.in,v 1.57 1999/10/05 05:31:36 hubbe 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:691:    string *tmp,path;    if(current_file)    {    tmp=EXPLODE_PATH(current_file);    tmp[-1]=what;    path=combine_path_with_cwd( tmp*"/");    }    return fc[path]=dirnode(path);   }    - mixed resolv(string identifier, string|void current_file) + mixed resolv_base(string identifier, string|void current_file)   {    array(mixed) tmp = ({});    foreach(pike_module_path, string path)    {    string file=combine_path(path,identifier);    if(mixed ret=findmodule(file)) {    if ((objectp(ret)) &&    (< joinnode, dirnode >)[object_program(ret)]) {    if (mixed new_ret = ret->_module_value) {    ret = new_ret;
pike.git/lib/master.pike.in:728:    }    if (sizeof(tmp)) {    if (sizeof(tmp) == 1) {    return(tmp[0]);    }    return joinnode(tmp);    }    return UNDEFINED;   }    + mixed resolv(string identifier, string|void current_file) + { +  array(string) tmp=identifier/"."; +  mixed ret=resolv_base(tmp[0]); +  foreach(tmp[1..],string index) ret=ret[index]; +  return ret; + } +    // These are useful if you want to start other Pike processes   // with the same options as this one was started with.   string _pike_file_name;   string _master_file_name;      /* This function is called when all the driver is done with all setup    * of modules, efuns, tables etc. etc. and is ready to start executing    * _real_ programs. It receives the arguments not meant for the driver    * and an array containing the environment variables on the same form as    * a C program receives them.