pike.git / src / encode.c

version» Context lines:

pike.git/src/encode.c:18:   #include "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.45 1999/11/03 23:53:15 grubba Exp $"); + RCSID("$Id: encode.c,v 1.46 1999/11/04 20:03:20 hubbe Exp $");      /* #define ENCODE_DEBUG */      #ifdef ENCODE_DEBUG   #define EDB(X) X   #else   #define EDB(X)   #endif      #ifdef _AIX
pike.git/src/encode.c:1140:    stack_dup();       if(data->codec)    {    apply(data->codec,"programof", 1);    }else{    ref_push_mapping(get_builtin_constants());    stack_swap();    f_index(2);    } -  if(data->pickyness && sp[-1].type != T_PROGRAM) { +  if(data->pickyness && !program_from_svalue(sp-1)) {    if ((prog_code->type == T_STRING) &&    (prog_code->u.string->len < 128) &&    (!prog_code->u.string->size_shift)) {    error("Failed to decode program \"%s\".\n",    prog_code->u.string->str);    }    error("Failed to decode program.\n");    }    /* Remove the extra entry from the stack. */    stack_swap();