pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1: - /* $Id: master.pike.in,v 1.51 1999/06/14 13:11:21 mirar Exp $ + /* $Id: master.pike.in,v 1.52 1999/06/19 19:50:19 hubbe Exp $    *    * Master-file for Pike.    *    * Based on master.pike 1.67.    */      // Some configurable parameters useful for debugging      // Used by describe_backtrace() et al.   #if !defined(BT_MAX_STRING_LEN) || (BT_MAX_STRING_LEN <= 0)
pike.git/lib/master.pike.in:715:    if(a=="") // Special hack for NT    {    sscanf(b,"%s=%s",a,b);    a="="+a;    }    environment[a]=b;    }    }       - #if defined(__NT__) && !defined(NOT_INSTALLED) -  function rget=lambda(string ent) { -  catch { return RegGetValue(HKEY_CURRENT_USER,"SOFTWARE\\Idonex\\Pike\\0.7",ent); }; -  catch { return RegGetValue(HKEY_LOCAL_MACHINE,"SOFTWARE\\Idonex\\Pike\\0.7",ent); }; +     -  }; -  string tmppath=rget("share_prefix"); -  // add path for architecture-shared files -  add_include_path(tmppath+"/include"); -  add_module_path(tmppath+"/modules"); -  -  tmppath=rget("lib_prefix"); -  // add path for architecture-dependant files -  add_include_path(tmppath+"/include"); -  add_module_path(tmppath+"/modules"); -  - #else -  +    #if "¤share_prefix¤"[0]!='¤'    // 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    - #endif +       #ifndef NOT_INSTALLED    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]);