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.85 2001/02/22 21:15:34 grubba Exp $"); + RCSID("$Id: encode.c,v 1.86 2001/02/24 22:08:43 grubba Exp $");      /* #define ENCODE_DEBUG */      #ifdef ENCODE_DEBUG   #define EDB(X) X   #else   #define EDB(X)   #endif      /* The sp macro conflicts with Solaris 2.5.1's <sys/conf.h>. */
pike.git/src/encode.c:395:    case T_STRING:    adddata(val->u.string);    break;       case T_TYPE:    /* NOTE: Types are added to the encoded mapping AFTER they have    * been encoded, to simplify decoding.    */    if (data->canonic)    Pike_error("Canonical encoding of the type type not supported.\n"); -  code_entry(TAG_TYPE, val->u.type->len, data); +  code_entry(TAG_TYPE, 0, data); /* Type encoding #0 */    encode_type(val->u.type->str, data);    mapping_insert(data->encoded, val, &data->counter);    data->counter.u.integer++;    break;       case T_FLOAT:    {    if(val->u.float_number==0.0)    {    code_entry(TAG_FLOAT,0,data);
pike.git/src/encode.c:1206:    EDB(fprintf(stderr, "Exponent: %d\n", num));       push_float(LDEXP(res, num));    break;    }       case TAG_TYPE:    {    struct pike_type *t;    +  /* FIXME: Should check that num is 0 here. */ +     decode_type(t, data);    check_type_string(t);    push_type_value(t);       tmp.type = T_INT;    tmp = data->counter;    data->counter.u.integer++;    }    break;