pike.git / src / mapping.c

version» Context lines:

pike.git/src/mapping.c:287: Inside #if defined(PIKE_DEBUG)
   md->refs);    }   #endif /* PIKE_DEBUG */       NEW_MAPPING_LOOP(md)    {    free_svalue(& k->val);    free_svalue(& k->ind);    }    -  free((char *) md); +  free(md);    GC_FREE_BLOCK(md);   }      PMOD_EXPORT void do_free_mapping(struct mapping *m)   {    if (m)    inl_free_mapping(m);   }      /* This function is used to rehash a mapping without losing the internal
pike.git/src/mapping.c:544:    unlink_mapping_data(md);    }else{    /* evil */    /* We have the only reference to the md,    * so we can just copy the svalues without    * bothering about type checking.    */    for(e=0;e<md->hashsize;e++)    mapping_rehash_backwards_evil(new_md, md->hash[e]);    -  free((char *)md); +  free(md);    GC_FREE_BLOCK(md);    }      #ifdef PIKE_DEBUG    if((m->data->size != tmp) &&    ((m->data->size > tmp) || !(m->data->flags & MAPPING_WEAK)))    Pike_fatal("Rehash failed, size not same any more (%ld != %ld).\n",    (long)m->data->size, (long)tmp);   #endif   #ifdef MAPPING_SIZE_DEBUG
pike.git/src/mapping.c:1764:    SET_ONERROR(r1,do_free_array,ai);       av=mapping_values(a);    SET_ONERROR(r2,do_free_array,av);       if(ai->size > 1)    {    zipper=get_set_order(ai);    order_array(ai, zipper);    order_array(av, zipper); -  free((char *)zipper); +  free(zipper);    }       bi=mapping_indices(b);    SET_ONERROR(r3,do_free_array,bi);       bv=mapping_values(b);    SET_ONERROR(r4,do_free_array,bv);       if(bi->size > 1)    {    zipper=get_set_order(bi);    order_array(bi, zipper);    order_array(bv, zipper); -  free((char *)zipper); +  free(zipper);    }       zipper=merge(ai,bi,op);       ci=array_zip(ai,bi,zipper);       UNSET_ONERROR(r4); free_array(bi);    UNSET_ONERROR(r3); free_array(ai);       cv=array_zip(av,bv,zipper);       UNSET_ONERROR(r2); free_array(bv);    UNSET_ONERROR(r1); free_array(av);    -  free((char *)zipper); +  free(zipper);       m=mkmapping(ci, cv);    free_array(ci);    free_array(cv);       return m;   }      /* FIXME: What are the semantics for this function?    * FIXME: It ought to be optimized just like the unordered variant.
pike.git/src/mapping.c:1824:       ai=mapping_indices(a);    SET_ONERROR(r1,do_free_array,ai);    av=mapping_values(a);    SET_ONERROR(r2,do_free_array,av);    if(ai->size > 1)    {    zipper=get_set_order(ai);    order_array(ai, zipper);    order_array(av, zipper); -  free((char *)zipper); +  free(zipper);    }       switch (op) /* no elements from »b» may be selected */    {    case PIKE_ARRAY_OP_AND:    zipper=merge(b,ai,op);    ci=array_zip(b,ai,zipper); /* b must not be used */    cv=array_zip(b,av,zipper); /* b must not be used */    break;    case PIKE_ARRAY_OP_SUB:
pike.git/src/mapping.c:1846:    ci=array_zip(ai,b,zipper); /* b must not be used */    cv=array_zip(av,b,zipper); /* b must not be used */    break;    default:    Pike_fatal("merge_mapping_array on other than AND or SUB\n");    }       UNSET_ONERROR(r2); free_array(av);    UNSET_ONERROR(r1); free_array(ai);    -  free((char *)zipper); +  free(zipper);       m=mkmapping(ci, cv);    free_array(ci);    free_array(cv);       return m;   }      PMOD_EXPORT struct mapping *merge_mapping_array_unordered(struct mapping *a,    struct array *b, INT32 op)