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.70 1999/11/23 22:35:44 grubba Exp $"); + RCSID("$Id: pike_types.c,v 1.71 1999/11/23 23:28:18 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:1921:    }    if(CDR(n)->token == F_CONSTANT && CDR(n)->u.sval.type==T_STRING)    {    INT32 i;    i=find_shared_string_identifier(CDR(n)->u.sval.u.string, p);    if(i==-1)    {    reference_shared_string(mixed_type_string);    return mixed_type_string;    }else{ + #if 0    if(EXTRACT_UCHAR(t) ||    (p->identifier_references[i].id_flags & ID_NOMASK) ||    (ID_FROM_INT(p, i)->identifier_flags & IDENTIFIER_PROTOTYPED))    { -  + #endif    reference_shared_string(ID_FROM_INT(p, i)->type);    return ID_FROM_INT(p, i)->type; -  + #if 0    }else{    reference_shared_string(mixed_type_string);    return mixed_type_string;    } -  + #endif    }    }    }    }    default:    reference_shared_string(mixed_type_string);    return mixed_type_string;       case T_INT:   #ifdef AUTO_BIGNUM