pike.git / src / encode.c

version» Context lines:

pike.git/src/encode.c:1:   /*   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: encode.c,v 1.258 2008/02/08 22:12:09 grubba Exp $ + || $Id: encode.c,v 1.259 2008/02/14 17:46:18 grubba Exp $   */      #include "global.h"   #include "stralloc.h"   #include "pike_macros.h"   #include "object.h"   #include "constants.h"   #include "interpret.h"   #include "svalue.h"   #include "mapping.h"
pike.git/src/encode.c:1439:    SEE_STATIC|SEE_PRIVATE);    if (i >= 0) {    /* Found the symbol. */    gs_flags = PTR_FROM_INT(p, i)->id_flags;    }    free_string(symbol);    }    }       if (IDENTIFIER_IS_ALIAS(id->identifier_flags)) { +  if ((!id->func.ext_ref.depth) && +  IDENTIFIER_IS_VARIABLE(id->identifier_flags)) { +  /* Let define_variable() handle the decoding. */ +  EDB(3, fprintf(stderr, "%*sencode: encoding aliased variable\n", data->depth, "")); +  goto encode_entry_variable; +  } +  EDB(3, fprintf(stderr, "%*sencode: encoding alias\n", +  data->depth, "")); +     code_number(ID_ENTRY_ALIAS, data);       /* flags */    code_number(ref->id_flags, data);       /* name */    str_sval.u.string = id->name;    encode_value2(&str_sval, data, 0);       /* depth */
pike.git/src/encode.c:1542:    /* Not supported. */    Pike_error("Cannot encode functions implemented in C "    "(identifier=\"%S\").\n",    p->identifiers[d].name);    break;       case IDENTIFIER_VARIABLE:    EDB(3,    fprintf(stderr, "%*sencode: encoding variable\n",    data->depth, "")); -  +  encode_entry_variable:    code_number(ID_ENTRY_VARIABLE, data);    if (gs_flags >= 0) {    code_number(gs_flags, data);    } else {    code_number(ref->id_flags, data);    }       /* name */    str_sval.u.string = id->name;    encode_value2(&str_sval, data, 0);