pike.git / src / gc.c

version» Context lines:

pike.git/src/gc.c:897:    break;       case T_MULTISET:    descblock = ((struct multiset *) memblock)->msd;    /* FALL THROUGH */       case T_MULTISET_DATA: {    struct multiset_data *msd = (struct multiset_data *) descblock;    union msnode *node = low_multiset_first (msd);    struct svalue ind; -  int indval = msd->flags & MULTISET_INDVAL; +     for (; node; node = low_multiset_next (node)) {    if (&node->i.ind == (struct svalue *) location) {    fprintf (stderr, "%*s **In index ", indent, "");    safe_print_svalue (stderr, low_use_multiset_index (node, ind));    fputc ('\n', stderr);    break;    } -  else if (indval && &node->iv.val == (struct svalue *) location) { -  fprintf(stderr, "%*s **In value with index ", indent, ""); -  safe_print_svalue (stderr, low_use_multiset_index (node, ind)); -  fputc('\n', stderr); -  break; +     } -  } +     break;    }       case T_ARRAY:    {    struct array *a=(struct array *)descblock;    struct svalue *s=(struct svalue *)location;       if(location == (void *)&a->next)    fprintf(stderr,"%*s **In a->next\n",indent,"");