pike.git / src / las.c

version» Context lines:

pike.git/src/las.c:3047:    }    break;       case F_CONSTANT:    switch(TYPEOF(n->u.sval))    {    case T_FUNCTION:    if(SUBTYPEOF(n->u.sval) == FUNCTION_BUILTIN)    {    name = n->u.sval.u.efun->name; -  }else{ -  name = -  ID_FROM_INT(n->u.sval.u.object->prog, SUBTYPEOF(n->u.sval))->name; +  } else { +  struct program *p = n->u.sval.u.object->prog; +  if (!p) { +  p = id_to_program(n->u.sval.u.object->program_id);    } -  +  if (p) { +  name = ID_FROM_INT(p, SUBTYPEOF(n->u.sval))->name; +  } else { +  MAKE_CONST_STRING(name, "function in destructed object"); +  } +  }    break;       case T_ARRAY:    MAKE_CONST_STRING(name, "array call");    break;       case T_PROGRAM:    MAKE_CONST_STRING(name, "clone call");    break;