pike.git / src / encode.c

version» Context lines:

pike.git/src/encode.c:18:   #include "pike_error.h"   #include "operators.h"   #include "builtin_functions.h"   #include "module_support.h"   #include "fsort.h"   #include "threads.h"   #include "stuff.h"   #include "version.h"   #include "bignum.h"    - RCSID("$Id: encode.c,v 1.131 2001/11/08 23:34:28 nilsson Exp $"); + RCSID("$Id: encode.c,v 1.132 2001/11/10 17:22:40 mast Exp $");      /* #define ENCODE_DEBUG */      #ifdef ENCODE_DEBUG   /* Pass a nonzero integer as the third arg to encode_value,    * encode_value_canonic and decode_value to activate this debug. */   #define EDB(N,X) do { debug_malloc_touch(data); if (data->debug>=N) {X;} } while (0)   #else   #define EDB(N,X) do { debug_malloc_touch(data); } while (0)   #endif
pike.git/src/encode.c:2937:    if(*l < t) Pike_error("Format error: string to short\n");    push_string(make_shared_binary_string(*v, t));    (*l)-= t;    (*v)+= t;    return;       case TAG_ARRAY:    if(t<0) Pike_error("Format error: length of array is negative.\n");    check_stack(t);    for(i=0;i<t;i++) rec_restore_value(v,l); -  f_aggregate(DO_NOT_WARN(t)); +  f_aggregate(DO_NOT_WARN(t)); /* FIXME: Unbounded stack consumption. */    return;       case TAG_MULTISET:    if(t<0) Pike_error("Format error: length of multiset is negative.\n");    check_stack(t);    for(i=0;i<t;i++) rec_restore_value(v,l); -  f_aggregate_multiset(DO_NOT_WARN(t)); +  f_aggregate_multiset(DO_NOT_WARN(t)); /* FIXME: Unbounded stack consumption. */    return;       case TAG_MAPPING:    if(t<0) Pike_error("Format error: length of mapping is negative.\n");    check_stack(t*2);    for(i=0;i<t;i++)    {    rec_restore_value(v,l);    rec_restore_value(v,l);    } -  f_aggregate_mapping(DO_NOT_WARN(t*2)); +  f_aggregate_mapping(DO_NOT_WARN(t*2)); /* FIXME: Unbounded stack consumption. */    return;       case TAG_OBJECT:    if(t<0) Pike_error("Format error: length of object is negative.\n");    if(*l < t) Pike_error("Format error: string to short\n");    push_string(make_shared_binary_string(*v, t));    (*l) -= t; (*v) += t;    APPLY_MASTER("objectof", 1);    return;