pike.git / src / pike_types.c

version» Context lines:

pike.git/src/pike_types.c:1:   /*\   ||| This file a part of Pike, and is copyright by Fredrik Hubinette   ||| Pike is distributed as GPL (General Public License)   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: pike_types.c,v 1.10 1996/11/25 21:31:54 hubbe Exp $"); + RCSID("$Id: pike_types.c,v 1.11 1996/12/07 03:23:46 hubbe 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:230:    s=end_shared_string(s);    reset_type_stack();    CHECK_TYPE(s);    return s;   }            static void internal_parse_typeA(char **_s)   { -  unsigned char buf[80]; +  char buf[80];    unsigned int len;    unsigned char **s = (unsigned char **)_s;       while(ISSPACE(**s)) ++*s;       len=0; -  for(len=0;isidchar(s[0][len]);len++) +  for(len=0;isidchar(EXTRACT_UCHAR(s[0]+len));len++)    {    if(len>=sizeof(buf)) error("Buffer overflow in parse_type\n");    buf[len] = s[0][len];    }    buf[len]=0;    *s += len;       if(!strcmp(buf,"int")) push_type(T_INT);    else if(!strcmp(buf,"float")) push_type(T_FLOAT);    else if(!strcmp(buf,"object"))