pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1:   /* -*- Pike -*-    * -  * $Id: master.pike.in,v 1.114 2000/04/10 21:20:08 grubba Exp $ +  * $Id: master.pike.in,v 1.115 2000/04/12 18:39:38 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:855:    }    return joinnode(tmp);    }    return UNDEFINED;   }      mapping resolv_cache = set_weak_flag( ([]), 1 );   mixed resolv(string identifier, string|void current_file)   {    mixed ret; -  if( !zero_type (ret = resolv_cache[identifier+current_file]) ) -  return ret == ZERO_TYPE ? UNDEFINED : resolv_cache[identifier+current_file]; +  string id=identifier+":"+(current_file ? dirname(current_file) : "-"); +  if( !zero_type (ret = resolv_cache[id]) ) +  return ret == ZERO_TYPE ? UNDEFINED : resolv_cache[id];    array(string) tmp=identifier/".";    ret=resolv_base(tmp[0]);    foreach(tmp[1..],string index) ret=ret[index]; -  resolv_cache[identifier+current_file] = zero_type (ret) ? ZERO_TYPE : ret; +  resolv_cache[id] = zero_type (ret) ? ZERO_TYPE : ret;    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