pike.git/ src/ builtin_functions.c

2003-01-11

2003-01-11 17:06:26 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• 00c1d73c79c08ceb07c619c7352c2a1a6e5c75ba (7 lines) (+4/-3) ^{[ Show | Annotate ]}
  Branch: 7.9

ISO-C §6.3.4.

Rev: src/builtin_functions.c:1.458

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: builtin_functions.c,v 1.457 2003/01/11 03:22:16 mast Exp $ + || $Id: builtin_functions.c,v 1.458 2003/01/11 17:06:26 grubba Exp $   */      #include "global.h" - RCSID("$Id: builtin_functions.c,v 1.457 2003/01/11 03:22:16 mast Exp $"); + RCSID("$Id: builtin_functions.c,v 1.458 2003/01/11 17:06:26 grubba Exp $");   #include "interpret.h"   #include "svalue.h"   #include "pike_macros.h"
2315:    /* FIXME: Ought to handle or-nodes here. */    if(t && (t->type == T_OBJECT))    { -  struct program *p = id_to_program((ptrdiff_t)t->cdr); +  struct program *p = id_to_program(((char *)t->cdr)-(char *)0);    if(p)    {    int fun=FIND_LFUN(p, lfun);