pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1: - /* $Id: master.pike.in,v 1.49 1999/06/01 12:12:11 mirar Exp $ + /* $Id: master.pike.in,v 1.50 1999/06/02 21:21:39 marcus 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]);   #endif