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.246 2005/04/06 17:38:15 grubba Exp $ + || $Id: pike_types.c,v 1.247 2005/05/19 22:35:31 mast Exp $   */      #include "global.h"   #include <ctype.h>   #include "svalue.h"   #include "pike_types.h"   #include "stralloc.h"   #include "stuff.h"   #include "array.h"   #include "program.h"
pike.git/src/pike_types.c:351:    * cdr: 0x400000000    * next: 0x100000000    */    Pike_fatal("Attempt to create an invalid type node: %d(%s)\n"    " car: %p\n"    " cdr: %p\n",    type, get_name_of_type(type),    car, cdr);    }    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) {   #ifdef PIKE_EXTRA_DEBUG    if ((type == T_FUNCTION) &&    (car->type == T_STRING) &&    (cdr->type == T_FUNCTION) &&    (cdr->car->type == T_STRING) &&
pike.git/src/pike_types.c:994:    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])