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. - || $Id: pike_types.c,v 1.235 2004/08/16 16:20:18 mast Exp $ + || $Id: pike_types.c,v 1.236 2005/05/18 12:36:53 mast Exp $   */      #include "global.h" - RCSID("$Id: pike_types.c,v 1.235 2004/08/16 16:20:18 mast Exp $"); + RCSID("$Id: pike_types.c,v 1.236 2005/05/18 12:36:53 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:331:   {    unsigned INT32 hash = DO_NOT_WARN((unsigned INT32)    ((ptrdiff_t)type*0x10204081)^    (0x8003*PTR_TO_INT(car))^    ~(0x10001*PTR_TO_INT(cdr)));    unsigned INT32 index = hash % pike_type_hash_size;    struct pike_type *t;       /* PIKE_DEBUG code */    if (index >= pike_type_hash_size) { -  Pike_fatal("Modulo operation failed for hash:%u, index:%u, size:%u.\n", +  Pike_fatal("Modulo operation failed for hash:%u, index:%u, " +  "size:%"PRINTSIZET"d.\n",    hash, index, pike_type_hash_size);    }    /* End PIKE_DEBUG code */       for(t = pike_type_hash[index]; t; t = t->next) {    if ((t->hash == hash) && (t->type == type) &&    (t->car == car) && (t->cdr == cdr)) {    /* Free car & cdr as appropriate. */    switch(type) {    case T_FUNCTION:
pike.git/src/pike_types.c:937:    return ret;   }      struct pike_type *debug_pop_unfinished_type(void)   {    ptrdiff_t len;       len = pop_stack_mark();       if (len != 1) { -  Pike_fatal("pop_unfinished_type(): Unexpected len: %d\n", len); +  Pike_fatal("pop_unfinished_type(): Unexpected len: %"PRINTPTRDIFFT"d\n", len);    }       TYPE_STACK_DEBUG("pop_unfinished_type");       return *(Pike_compiler->type_stackp--);   }      /******/      static void internal_parse_typeA(const char **_s)   {    char buf[80];    unsigned int len;    const unsigned char **s = (const unsigned char **)_s;       while(ISSPACE(**s)) ++*s;       for(len=0;isidchar(EXTRACT_UCHAR(s[0]+len));len++)    {    if(len>=sizeof(buf)) { -  my_yyerror("Buffer overflow in parse_type(\"%s\") (limit %d).", +  my_yyerror("Buffer overflow in parse_type(\"%s\") (limit %"PRINTSIZET"d).",    *s, sizeof(buf));    push_type(T_MIXED);    return;    }    buf[len] = s[0][len];    }    buf[len]=0;    *s += len;       switch(buf[0])