pike.git/
lib/
master.pike.in
Branch:
Tag:
Non-build tags
All tags
No tags
2004-04-17
2004-04-17 16:28:53 by Marcus Comstedt <marcus@mc.pp.se>
8c201a120d643e0290da95519fa1f8d95bae47db (
11
lines) (+
8
/-
3
)
[
Show
|
Annotate
]
Branch:
7.9
Store cloned modules in object cache.
Rev: lib/master.pike.in:1.343
6:
// Pike is distributed under GPL, LGPL and MPL. See the file COPYING // for more information. //
-
// $Id: master.pike.in,v 1.
342
2004/04/17 16:
00
:
41
marcus Exp $
+
// $Id: master.pike.in,v 1.
343
2004/04/17 16:
28
:
53
marcus Exp $
#pike __REAL_VERSION__ //#pragma strict_types
1338:
#if constant(load_module) if (has_suffix(fname, ".so")) { // This is compatible with 7.4 behaviour.
-
if (!ret->_module_value)
-
ret
= ret();
+
if (!ret->_module_value)
{
+
object o;
+
// NB: p might be a function in a fake_object...
+
if(!objectp (o=objects[
ret
]))
o
=
objects[
ret
]=ret
();
+
ret = o;
+
}
if(mixed tmp=ret->_module_value) ret=tmp; } #endif