pike.git
/
src
/
program.c
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/src/program.c:11046:
Inside #if 0
#if 0 p = p->inherits[SUBTYPEOF(*s)].prog; if ((call_fun = FIND_LFUN(p, LFUN_CALL)) >= 0) { /* Get the program from the return type. */ struct identifier *id = ID_FROM_INT(p, call_fun); /* FIXME: do it. */ return 0; } #endif push_svalue(s);
-
f
_
object_program
(
1
);
+
o
_
cast(program
_
type_string, T_PROGRAM
);
p = low_program_from_svalue(Pike_sp-1, parent_obj, parent_id); pop_stack(); return p; /* We trust that there is a reference somewhere... */ } case T_FUNCTION: if (SUBTYPEOF(*s) == FUNCTION_BUILTIN) return 0; return low_program_from_function(*parent_obj = s->u.object, *parent_id = SUBTYPEOF(*s));