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.14 1997/01/27 01:28:34 hubbe Exp $"); + RCSID("$Id: pike_types.c,v 1.15 1997/01/30 03:51:36 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:1130:    push_type(T_MIXED);    push_type(T_MIXED);    push_type(T_MAPPING);    return pop_type();       case T_OBJECT:    push_type_int(0);    push_type(T_OBJECT);    return pop_type();    +  case T_INT: +  if(s->u.integer) +  { +  ret=int_type_string; +  }else{ +  ret=mixed_type_string; +  } +  reference_shared_string(ret); +  return ret; +     default:    push_type(s->type);    return pop_type();    }   }         char *get_name_of_type(int t)   {    switch(t)