pike.git / src / multiset.c

version» Context lines:

pike.git/src/multiset.c:10:   #include "svalue.h"   #include "pike_macros.h"   #include "pike_memory.h"   #include "pike_error.h"   #include "dynamic_buffer.h"   #include "interpret.h"   #include "builtin_functions.h"   #include "gc.h"   #include "security.h"    - RCSID("$Id: multiset.c,v 1.33 2001/04/07 07:38:24 hubbe Exp $"); + RCSID("$Id: multiset.c,v 1.34 2001/04/14 11:22:33 jhs Exp $");      struct multiset *first_multiset;      struct multiset *gc_internal_multiset = 0;   static struct multiset *gc_mark_multiset_pos = 0;      PMOD_EXPORT int multiset_member(struct multiset *l, struct svalue *ind)   {    int i;    add_ref(l->ind);
pike.git/src/multiset.c:291:    }else{    return mkefuncallnode("mkmultiset",make_node_from_array(l->ind));    }   }      /*! @decl multiset aggregate_multiset(mixed ... elems)    *!    *! Construct a multiset.    *!    *! Construct a multiset with the arguments as indices. -  *! An alternative and more preferrable syntax is: -  *! @code{(< elem1, elem2, ... >)@} +  *! This method is most useful when constructing multisets +  *! with @[map] or similar; generally, the multiset literal +  *! syntax is handier: @code{(< elem1, elem2, ... >)@}    *!    *! @seealso    *! @[sizeof()], @[multisetp()], @[mkmultiset()]    */   PMOD_EXPORT void f_aggregate_multiset(INT32 args)   {    struct multiset *l;    f_aggregate(args);    l=allocate_multiset(sp[-1].u.array);    order_multiset(l);