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.99 2002/05/07 09:13:47 jonasw Exp $"); + RCSID("$Id: encode.c,v 1.100 2003/06/02 11:27:53 mast Exp $");      /* #define ENCODE_DEBUG */      /* Use the old encoding method for programs. */   /* #define OLD_PIKE_ENCODE_PROGRAM */      #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 if (data->debug>=N) {X;} while (0)
pike.git/src/encode.c:1517:       SET_ONERROR(err1, restore_type_stack, Pike_compiler->type_stackp);    SET_ONERROR(err2, restore_type_mark, Pike_compiler->pike_type_mark_stackp);      one_more_type:    tmp = GETC();    push_type(tmp);    switch(tmp)    {    default: -  fatal("error in type string.\n"); +  Pike_error("error in type string.\n");    /*NOTREACHED*/    break;       case T_ASSIGN:    push_type(GETC());    goto one_more_type;       case T_FUNCTION:    while(GETC()!=T_MANY)    {