pike.git / src / pike_types.c

version» Context lines:

pike.git/src/pike_types.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.   \*/   /**/   #include "global.h" - RCSID("$Id: pike_types.c,v 1.191 2002/07/23 12:03:56 grubba Exp $"); + RCSID("$Id: pike_types.c,v 1.192 2002/07/23 13:23:04 mast Exp $");   #include <ctype.h>   #include "svalue.h"   #include "pike_types.h"   #include "stralloc.h"   #include "stuff.h"   #include "array.h"   #include "program.h"   #include "constants.h"   #include "object.h"   #include "multiset.h"
pike.git/src/pike_types.c:2509:    /* object(x *) =? object(x *) */    if(a->car == b->car)    {    /* x? */    if(a->car)    {    /* object(1 x) =? object(1 x) */    if(a->cdr != b->cdr) return 0;    }else{    /* object(0 *) =? object(0 *) */ + #if 0 +  /* This is known to cause trouble in some cases when comparing +  * the same function prototype in the first and second passes +  * (got "Prototype doesn't match for function foo" even though +  * there was no other prototype for that function). /mast */    struct program *ap,*bp;    ap = id_to_program((ptrdiff_t)a->cdr);    bp = id_to_program((ptrdiff_t)b->cdr);    if (!is_compatible(ap, bp)) return 0; -  + #endif    break;    }    }       {    struct program *ap,*bp;    ap = id_to_program((ptrdiff_t)a->cdr);    bp = id_to_program((ptrdiff_t)b->cdr);       if(!ap || !bp) break;