pike.git / src / program.c

version» Context lines:

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));