Branch: Tag:

1999-02-10

1999-02-10 22:03:31 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

lots of minor optimizations..

Rev: src/builtin_functions.c:1.148
Rev: src/constants.c:1.14
Rev: src/constants.h:1.8
Rev: src/cpp.c:1.33
Rev: src/dynamic_load.c:1.34
Rev: src/module.c:1.10
Rev: src/modules/Gdbm/gdbmmod.c:1.7
Rev: src/modules/Gmp/mpz_glue.c:1.39
Rev: src/modules/Gz/zlibmod.c:1.23
Rev: src/modules/Image/colors.c:1.9
Rev: src/modules/Image/colortable.c:1.48
Rev: src/modules/Image/font.c:1.43
Rev: src/modules/Image/image.c:1.112
Rev: src/modules/Msql/msqlmod.c:1.10
Rev: src/modules/Mysql/mysql.c:1.26
Rev: src/modules/Mysql/result.c:1.15
Rev: src/modules/Odbc/odbc.c:1.14
Rev: src/modules/Odbc/odbc_result.c:1.17
Rev: src/modules/Oracle/oracle.c:1.16
Rev: src/modules/Perl/perlmod.c:1.6
Rev: src/modules/Pipe/pipe.c:1.30
Rev: src/modules/Postgres/pgresult.c:1.10
Rev: src/modules/Postgres/postgres.c:1.12
Rev: src/modules/Regexp/glue.c:1.14
Rev: src/modules/Ssleay/ssleay.c:1.11
Rev: src/modules/Yp/yp.c:1.16
Rev: src/modules/_Charset/charsetmod.c:1.9
Rev: src/modules/_Charset/iso2022.c:1.4
Rev: src/modules/_Crypto/cast.c:1.6
Rev: src/modules/_Crypto/cbc.c:1.14
Rev: src/modules/_Crypto/crypto.c:1.27
Rev: src/modules/_Crypto/des.c:1.13
Rev: src/modules/_Crypto/idea.c:1.13
Rev: src/modules/_Crypto/invert.c:1.8
Rev: src/modules/_Crypto/md2.c:1.6
Rev: src/modules/_Crypto/md5.c:1.12
Rev: src/modules/_Crypto/pipe.c:1.14
Rev: src/modules/_Crypto/rc4.c:1.9
Rev: src/modules/_Crypto/sha.c:1.15
Rev: src/modules/_Image_JPEG/image_jpeg.c:1.20
Rev: src/modules/_Image_TTF/image_ttf.c:1.11
Rev: src/modules/_Image_XFace/image_xface.c:1.6
Rev: src/modules/call_out/call_out.c:1.25
Rev: src/modules/files/efuns.c:1.64
Rev: src/modules/files/socket.c:1.42
Rev: src/modules/math/math.c:1.17
Rev: src/modules/spider/accesseddb.c:1.18
Rev: src/modules/spider/dumudp.c:1.43
Rev: src/modules/spider/spider.c:1.78
Rev: src/modules/spider/xml.c:1.7
Rev: src/modules/sprintf/sprintf.c:1.32
Rev: src/modules/system/nt.c:1.8
Rev: src/modules/system/passwords.c:1.24
Rev: src/modules/system/system.c:1.62
Rev: src/object.c:1.57
Rev: src/operators.c:1.47
Rev: src/pike_macros.h:1.12
Rev: src/pike_types.c:1.50
Rev: src/pike_types.h:1.17
Rev: src/program.c:1.110
Rev: src/program.h:1.51
Rev: src/security.c:1.11
Rev: src/signal_handler.c:1.106
Rev: src/stralloc.h:1.29
Rev: src/svalue.h:1.21
Rev: src/threads.c:1.89

28:   #include "builtin_functions.h"   #include "module_support.h"    - RCSID("$Id: yp.c,v 1.15 1999/02/01 02:45:31 hubbe Exp $"); + RCSID("$Id: yp.c,v 1.16 1999/02/10 21:51:02 hubbe Exp $");      #define YPERROR(fun,err) do{ if(err) error("yp->%s(): %s\n", (fun), \    yperr_string(err)); }while(0)
216:      void pike_module_init(void)   { -  add_efun("default_yp_domain", f_default_yp_domain, "function(void:string)", +  + /* function(void:string) */ +  ADD_EFUN("default_yp_domain", f_default_yp_domain,tFunc(tVoid,tStr),    OPT_EXTERNAL_DEPEND);       start_new_program();
226:    set_init_callback( init_yp_struct );    set_exit_callback( exit_yp_struct );    -  add_function("create", f_create, "function(string|void:void)", 0); -  add_function("bind", f_create, "function(string:void)", 0); +  /* function(string|void:void) */ +  ADD_FUNCTION("create", f_create,tFunc(tOr(tStr,tVoid),tVoid), 0); +  /* function(string:void) */ +  ADD_FUNCTION("bind", f_create,tFunc(tStr,tVoid), 0);    -  add_function("match", f_match, "function(string,string:string)", 0); -  add_function("server", f_server, "function(string:string)", 0); -  add_function("all", f_all, "function(string:mapping(string:string))", 0); -  add_function("map", f_map, "function(string,function|array(function):void)", 0); -  add_function("order", f_order, "function(string:int)", 0); +  /* function(string,string:string) */ +  ADD_FUNCTION("match", f_match,tFunc(tStr tStr,tStr), 0); +  /* function(string:string) */ +  ADD_FUNCTION("server", f_server,tFunc(tStr,tStr), 0); +  /* function(string:mapping(string:string)) */ +  ADD_FUNCTION("all", f_all,tFunc(tStr,tMap(tStr,tStr)), 0); +  /* function(string,function|array(function):void) */ +  ADD_FUNCTION("map", f_map,tFunc(tStr tOr(tFunction,tArr(tFunction)),tVoid), 0); +  /* function(string:int) */ +  ADD_FUNCTION("order", f_order,tFunc(tStr,tInt), 0);       end_class("Domain", 0);   }