pike.git/src/program.c:6420:
* B-+-foo All versions of Pike
* |
* +-A---foo
*
* External lookup of identifier "foo" in E():
*
* F-+-A---foo --- Pike 7.7.33
* |
* +-E---foo Pike 7.7.34 ---
*/
- int really_low_find_shared_string_identifier(struct pike_string *name,
+ PMOD_EXPORT int really_low_find_shared_string_identifier(struct pike_string *name,
struct program *prog,
int flags)
{
struct reference *funp;
struct identifier *fun;
int id, i, depth, last_inh;
#if 0
CDFPRINTF((stderr,"th(%ld) %p Trying to find %s flags=%d\n",
(long)th_self(), prog, name->str, flags));
pike.git/src/program.c:11263: Inside #if defined(_REENTRANT)
#ifdef _REENTRANT
if(d_flag) CHECK_INTERPRETER_LOCK();
#endif
offset= low_get_storage(o->prog, p);
if(offset == -1) return 0;
return o->storage + offset;
}
- struct program *low_program_from_function(struct object *o, INT32 i)
+ PMOD_EXPORT struct program *low_program_from_function(struct object *o, INT32 i)
{
struct svalue *f;
struct program *p;
struct identifier *id;
while(1) {
struct external_variable_context loc;
p = o->prog;
if(!p) return 0;