pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1: - /* $Id: master.pike.in,v 1.14 1998/04/18 12:50:19 mirar Exp $ + /* $Id: master.pike.in,v 1.15 1998/04/19 00:08:53 hubbe Exp $    *    * Master-file for Pike.    *    * Based on master.pike 1.67.    */      int is_absolute_path(string p)   {   #ifdef __NT__    p=replace(p,"\\","/");
pike.git/lib/master.pike.in:38:      #define GETCWD_CACHE   #define FILE_STAT_CACHE      #define UNDEFINED (([])[0])   #define error(X) throw( ({ (X), backtrace()[0..sizeof(backtrace())-2] }) )      string describe_backtrace(mixed *trace);   object low_cast_to_object(string oname, string current_file);    - string _master_file_name; +    string pike_library_path;   string *pike_include_path=({});   string *pike_module_path=({});   string *pike_program_path=({});   int want_warnings;      program compile_string(string data, void|string name)   {    return compile(cpp(data,name||"-"));   }
pike.git/lib/master.pike.in:507:    add_constant("write",_static_modules.files()->_stdout->write);       // add path for architecture-shared files    add_include_path("¤share_prefix¤/include");    add_module_path("¤share_prefix¤/modules");       // add path for architecture-dependant files    add_include_path("¤lib_prefix¤/include");    add_module_path("¤lib_prefix¤/modules");    -  _master_file_name=backtrace()[-1][0]; - #if 0 -  q=explode_path(_master_file_name); -  // add path for wherever the master is now -  add_include_path(pike_library_path+"/include"); -  add_module_path(pike_library_path+"/modules"); -  -  pike_library_path = combine_path_with_cwd(q[0..sizeof(q)-2] * "/"); -  -  add_include_path(pike_library_path+"/include"); -  add_module_path(pike_library_path+"/modules"); -  - #endif +     add_program_path(getcwd());    add_module_path(getcwd());    -  _master_file_name=combine_path(getcwd(), _master_file_name); -  +     q=(getenv("PIKE_INCLUDE_PATH")||"")/":"-({""});    for(i=sizeof(q)-1;i>=0;i--) add_include_path(q[i]);       q=(getenv("PIKE_PROGRAM_PATH")||"")/":"-({""});    for(i=sizeof(q)-1;i>=0;i--) add_program_path(q[i]);       q=(getenv("PIKE_MODULE_PATH")||"")/":"-({""});    for(i=sizeof(q)-1;i>=0;i--) add_module_path(q[i]);