pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1:   /* -*- Pike -*-    * -  * $Id: master.pike.in,v 1.116 2000/04/13 18:54:16 per Exp $ +  * $Id: master.pike.in,v 1.117 2000/05/07 00:39:52 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:582:    if(object o=low_cast_to_object(oname, current_file))    return o;    error("Cast '"+oname+"' to object failed"+    ((current_file && current_file!="-")?sprintf(" for '%s'",current_file):"")+".\n");    return 0;   }      class dirnode   {    string dirname; -  mixed module; +  mixed module=module_checker();    mapping(string:mixed) cache=([]);    array(string) files;       void create(string name)    {    dirname=name; -  +  }    -  +  class module_checker +  { +  int `!() +  { +  module=0;    if(module=findmodule(dirname+"/module"))    if(mixed tmp=module->_module_value)    module=tmp; -  +  return !module;    } -  +  }       static mixed ind(string index)    {    if(module)    {    object o;    if(!zero_type(o=module[index])) return o;    }       if( !files )