pike.git / src / gc.c

version» Context lines:

pike.git/src/gc.c:934:    }    break;    }       case T_STORAGE:    fprintf(stderr, "%*s **In storage of object\n", indent, "");    break;       case T_MULTISET:    descblock = ((struct multiset *) memblock)->msd; -  /* FALL THROUGH */ +  /* FALLTHRU */       case T_MULTISET_DATA: {    struct multiset_data *msd = (struct multiset_data *) descblock;    union msnode *node = low_multiset_first (msd);    struct svalue ind;    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);
pike.git/src/gc.c:970:    fprintf(stderr,"%*s **In a->prev\n",indent,"");       if( s-ITEM(a) > 0)    fprintf(stderr,"%*s **In index number %"PRINTPTRDIFFT"d\n",indent,"",    s-ITEM(a));    break;    }       case T_MAPPING:    descblock = ((struct mapping *) memblock)->data; -  /* FALL THROUGH */ +  /* FALLTHRU */    case T_MAPPING_DATA: {    INT32 e;    struct keypair *k;    NEW_MAPPING_LOOP((struct mapping_data *) descblock)    if (&k->ind == (struct svalue *) location) {    fprintf(stderr, "%*s **In index ", indent, "");    safe_print_svalue (stderr, &k->ind);    fputc('\n', stderr);    break;    }
pike.git/src/gc.c:1187: Inside #if defined(PIKE_DEBUG)
   if (!inblock) attempt_to_identify (a, &a);    t = T_OBJECT;    goto again;       case T_FUNCTION:    if(attempt_to_identify(a, 0) != T_OBJECT)    {    fprintf(stderr,"%*s**Builtin function!\n",indent,"");    break;    } -  /* FALL THROUGH */ +  /* FALLTHRU */       case T_OBJECT:    p=((struct object *)a)->prog;    if(p && (p->flags & PROGRAM_USES_PARENT))    {    fprintf(stderr,"%*s**Parent identifier: %d\n",indent,"",PARENT_INFO( ((struct object *)a) )->parent_identifier);    }    fprintf(stderr,"%*s**Program id: %d\n",indent,"",((struct object *)a)->program_id);       if (((struct object *)a)->next == ((struct object *)a))