pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1:   /* -*- Pike -*-    * -  * $Id: master.pike.in,v 1.92 2000/01/05 13:32:55 mast Exp $ +  * $Id: master.pike.in,v 1.93 2000/01/10 00:39:55 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:488:    // add path for architecture-dependant files    add_include_path("¤share_prefix¤/include");    add_module_path("¤share_prefix¤/modules");   #endif      #if "¤lib_prefix¤"[0]!='¤'    // add path for architecture-dependant files    add_include_path("¤lib_prefix¤/include");    add_module_path("¤lib_prefix¤/modules");   #endif -  -  random_seed(time() + (getpid() * 0x11111111)); +    }      /*    * This function is called whenever a inherit is called for.    * It is supposed to return the program to inherit.    * The first argument is the argument given to inherit, and the second    * is the file name of the program currently compiling. Note that the    * file name can be changed with #line, or set by compile_string, so    * it can not be 100% trusted to be a filename.    * previous_object(), can be virtually anything in this function, as it
pike.git/lib/master.pike.in:991:    werror("Include path : " + pike_include_path*"\n"    " " + "\n"    "Module path : " + pike_module_path*"\n"    " " + "\n"    "Program path : " + pike_program_path*"\n"    " " + "\n"    "Master file : " + (_master_file_name || __FILE__) + "\n");    exit(0);       case "execute": +  random_seed(time() + (getpid() * 0x11111111));    compile_string("#include <simulate.h>\nmixed create(){"+opts[1]+";}")();    exit(0);       case "preprocess":    _static_modules.files()->_stdout->write(cpp(_static_modules.files()->Fd(opts[1],"r")->read(),opts[1]));    exit(0);    }    }       argv = tmp->get_args(argv,1);    }    -  +  random_seed(time() + (getpid() * 0x11111111)); +     if(sizeof(argv)==1)    {    /* Attempt to resolv Tools.Hilfe.StdinHilfe */    tmp = resolv("Tools");    if (!tmp) {    werror("Couldn't find Tools.\n");    exit(1);    }    tmp = tmp["Hilfe"];    if (!tmp) {