pike.git/ src/ encode.c

2004-07-03

2004-07-03 09:22:53 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• b80585bb89bf8a137c58a2137e60ffd9f790b1f3 (9 lines) (+5/-4) ^{[ Show | Annotate ]}
  Branch: 7.9

Reverted dangerous "fix".

Rev: src/encode.c:1.218

2:   || 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.217 2004/07/02 23:45:54 srb Exp $ + || $Id: encode.c,v 1.218 2004/07/03 09:22:53 grubba Exp $   */ - #include <stdio.h> //srb +       #include "global.h"   #include "stralloc.h"
32:   #include "opcodes.h"   #include "peep.h"    - RCSID("$Id: encode.c,v 1.217 2004/07/02 23:45:54 srb Exp $"); + RCSID("$Id: encode.c,v 1.218 2004/07/03 09:22:53 grubba Exp $");      /* #define ENCODE_DEBUG */   
3611:    decode_value2(data);    switch(entry_type) {    case ID_ENTRY_EFUN_CONSTANT: -  if (Pike_sp[-1].type != T_FUNCTION) { +  if ((Pike_sp[-1].type != T_FUNCTION) || +  (Pike_sp[-1].subtype != FUNCTION_BUILTIN)) {    ref_push_program (p);    decode_error(Pike_sp - 1, Pike_sp - 2,    "Expected efun constant: ");