pike.git/
lib/
master.pike.in
Branch:
Tag:
Non-build tags
All tags
No tags
1998-06-06
1998-06-06 03:03:23 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
f26d33033bc1eca3ad5e377c4b8f3780d932a463 (
11
lines) (+
6
/-
5
)
[
Show
|
Annotate
]
Branch:
7.9
bugfixed for NT (hopefully)
Rev: lib/master.pike.in:1.31
1:
-
/* $Id: master.pike.in,v 1.
30
1998/
05
/
27
22
:
49
:
37
hubbe Exp $
+
/* $Id: master.pike.in,v 1.
31
1998/
06
/
06
03
:
03
:
23
hubbe Exp $
* * Master-file for Pike. *
561:
#if defined(__NT__) && !defined(NOT_INSTALLED) function rget=lambda(string ent) {
-
return
-
RegGetValue(HKEY_CURRENT_USER,"SOFTWARE\\Idonex\\Pike\\0.6",ent)
||
-
RegGetValue(HKEY_LOCAL_MACHINE,"SOFTWARE\\Idonex\\Pike\\0.6",ent) ;
+
catch
{
return
RegGetValue(HKEY_CURRENT_USER,"SOFTWARE\\Idonex\\Pike\\0.6",ent)
;
};
+
catch
{ return
RegGetValue(HKEY_LOCAL_MACHINE,"SOFTWARE\\Idonex\\Pike\\0.6",ent)
;
}
;
+
}; string tmppath=rget("share_prefix"); // add path for architecture-shared files add_include_path(tmppath+"/include"); add_module_path(tmppath+"/modules");
-
string tmp
=rget("lib_prefix");
+
tmppath
=rget("lib_prefix");
// add path for architecture-dependant files add_include_path(tmppath+"/include"); add_module_path(tmppath+"/modules");