pike.git / src / builtin_functions.c

version» Context lines:

pike.git/src/builtin_functions.c:1:   /*   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: builtin_functions.c,v 1.490 2003/04/28 00:32:43 mast Exp $ + || $Id: builtin_functions.c,v 1.491 2003/04/29 00:46:25 nilsson Exp $   */      #include "global.h" - RCSID("$Id: builtin_functions.c,v 1.490 2003/04/28 00:32:43 mast Exp $"); + RCSID("$Id: builtin_functions.c,v 1.491 2003/04/29 00:46:25 nilsson Exp $");   #include "interpret.h"   #include "svalue.h"   #include "pike_macros.h"   #include "object.h"   #include "program.h"   #include "array.h"   #include "pike_error.h"   #include "constants.h"   #include "mapping.h"   #include "stralloc.h"
pike.git/src/builtin_functions.c:8174:    tFunc(tArray tArray,tArr(tInt)), 0, OPT_TRY_OPTIMIZE);    /* function(array,array:array(int)) */    ADD_FUNCTION2("diff_dyn_longest_sequence", f_diff_dyn_longest_sequence,    tFunc(tArray tArray,tArr(tInt)), 0, OPT_TRY_OPTIMIZE);    /* function(array,array:array(array)) */    ADD_FUNCTION2("diff_compare_table", f_diff_compare_table,    tFunc(tArray tArray, tArr(tArr(tInt))), 0, OPT_TRY_OPTIMIZE);    /* function(array:array(int)) */    ADD_FUNCTION2("longest_ordered_sequence", f_longest_ordered_sequence,    tFunc(tArray,tArr(tInt)), 0, OPT_TRY_OPTIMIZE); -  /* function(array(0=mixed),array(mixed)...:array(0)) */ -  ADD_FUNCTION2("sort", f_sort, -  tFuncV(tArr(tSetvar(0, tMix)), tArr(tMix), tArr(tVar(0))), -  0, OPT_SIDE_EFFECT); +       #define tMapStuff(IN,SUB,OUTFUN,OUTSET,OUTPROG,OUTMIX,OUTARR,OUTMAP) \    tOr7( tFuncV(IN tFuncV(SUB,tMix,tSetvar(2,tAny)),tMix,OUTFUN), \    tIfnot(tFuncV(IN tFunction,tMix,tMix), \    tOr(tFuncV(IN tPrg(tObj), tMix, OUTPROG), \    tFuncV(IN tObj, tMix, OUTMIX))), \    tFuncV(IN tSet(tMix),tMix,OUTSET), \    tFuncV(IN tMap(tMix, tSetvar(2,tMix)), tMix, OUTMAP), \    tFuncV(IN tArray, tMix, OUTARR), \    tFuncV(IN tInt0, tMix, OUTMIX), \