Branch: Tag:

2001-03-17

2001-03-17 16:37:43 by Henrik Grubbström (Grubba) <grubba@grubba.org>

The type type is now a complex type.

Rev: src/builtin_functions.c:1.353
Rev: src/encode.c:1.92
Rev: src/operators.c:1.130
Rev: src/pike_types.c:1.162
Rev: src/svalue.h:1.80

6:   /**/   #include "global.h"   #include <math.h> - RCSID("$Id: operators.c,v 1.129 2001/03/04 19:27:18 mirar Exp $"); + RCSID("$Id: operators.c,v 1.130 2001/03/17 16:37:42 grubba Exp $");   #include "interpret.h"   #include "svalue.h"   #include "multiset.h"
3409:    tVar(0), tVar(0),tInt01),    tFuncV(tOr3(tObj,tProgram,tFunction) tMix,tMix,tInt01),    tFuncV(tMix tOr3(tObj,tProgram,tFunction),tMix,tInt01), -  tFuncV(tType tType,tOr3(tProgram,tFunction,tType),tInt01)), +  tFuncV(tType(tMix) tType(tMix), +  tOr3(tProgram,tFunction,tType(tMix)),tInt01)),    OPT_WEAK_TYPE|OPT_TRY_OPTIMIZE,optimize_eq,generate_comparison);    /* function(mixed...:int) */    ADD_EFUN2("`!=",f_ne,
3419:    tVar(0), tVar(0),tInt01),    tFuncV(tOr3(tObj,tProgram,tFunction) tMix,tMix,tInt01),    tFuncV(tMix tOr3(tObj,tProgram,tFunction),tMix,tInt01), -  tFuncV(tType tType,tOr3(tProgram,tFunction,tType),tInt01)), +  tFuncV(tType(tMix) tType(tMix), +  tOr3(tProgram,tFunction,tType(tMix)),tInt01)),    OPT_WEAK_TYPE|OPT_TRY_OPTIMIZE,0,generate_comparison);    /* function(mixed:int) */    ADD_EFUN2("`!",f_not,tFuncV(tMix,tVoid,tInt01),
3499:    F_AND_TYPE(tMapping),    F_AND_TYPE(tMultiset),    F_AND_TYPE(tString), -  F_AND_TYPE(tOr(tType,tPrg)) ), +  F_AND_TYPE(tOr(tType(tMix),tPrg)) ),       tIfnot(tFuncV(tNone, tNot(tMapping), tMix),    tFuncV(tNone,
3517:    tFuncV(tSetvar(3,tMultiset),tSetvar(4,tMultiset),tOr(tVar(3),tVar(4))), \    tFuncV(tSetvar(5,tArray),tSetvar(6,tArray),tOr(tVar(5),tVar(6))), \    tFuncV(tString,tString,tString), \ -  tFuncV(tOr(tType,tPrg),tOr(tType,tPrg),tType)) +  tFuncV(tOr(tType(tMix),tPrg),tOr(tType(tMix),tPrg),tType(tMix)))       ADD_EFUN2("`|",f_or,LOG_TYPE,OPT_TRY_OPTIMIZE,optimize_binary,generate_or);   
3593:    tFunc(tInt,tInt),    tFunc(tFlt,tFlt),    tFunc(tStr,tStr), -  tFunc(tOr(tType,tProgram),tType)), +  tFunc(tOr(tType(tMix),tProgram),tType(tMix))),    OPT_TRY_OPTIMIZE,0,generate_compl);    /* function(string|multiset|array|mapping|object:int) */    ADD_EFUN2("sizeof", f_sizeof,