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.86 1999/12/10 23:45:02 grubba Exp $"); + RCSID("$Id: pike_types.c,v 1.87 1999/12/11 03:41:47 grubba 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:880:    &&    ((EXTRACT_UCHAR(t+2) == T_MIXED && EXTRACT_UCHAR(t+3) == T_VOID) ||    (EXTRACT_UCHAR(t+3) == T_MIXED && EXTRACT_UCHAR(t+2) == T_VOID))    &&    EXTRACT_UCHAR(t+4) == T_OR    &&    ((EXTRACT_UCHAR(t+5) == T_MIXED && EXTRACT_UCHAR(t+6) == T_VOID) ||    (EXTRACT_UCHAR(t+6) == T_MIXED && EXTRACT_UCHAR(t+5) == T_VOID))))    {    /* done */ -  ; +  if (EXTRACT_UCHAR(t+1) == T_MIXED) { +  /* function(mixed...:mixed|void) */ +  t += 5;    } else { -  +  /* function(mixed|void...mixed|void) */ +  t += 7; +  } +  } else {    my_strcat("(");    s=0;    while(EXTRACT_UCHAR(t) != T_MANY)    {    if(s++) my_strcat(", ");    t=low_describe_type(t);    }    t++;    if(EXTRACT_UCHAR(t) == T_VOID)    {
pike.git/src/pike_types.c:959:    {    t+=2;    }else{    my_strcat("(");    t=low_describe_type(t);    my_strcat(":");    t=low_describe_type(t);    my_strcat(")");    }    break; +  default: +  { +  char buf[20]; +  my_strcat("unknown code("); +  sprintf(buf, "%d", EXTRACT_UCHAR(t-1)); +  my_strcat(buf); +  my_strcat(")"); +  break;    } -  +  }    return t;   }      struct pike_string *describe_type(struct pike_string *type)   {    check_type_string(type);    if(!type) return make_shared_string("mixed");    init_buf();    low_describe_type(type->str);    return free_buf();