Branch: Tag:

2000-02-02

2000-02-02 00:38:27 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

minor optimizations + new efun: _gc_status

Rev: src/builtin_functions.c:1.234
Rev: src/gc.c:1.46
Rev: src/gc.h:1.23

5:   \*/   /**/   #include "global.h" - RCSID("$Id: builtin_functions.c,v 1.233 2000/01/29 13:42:14 mirar Exp $"); + RCSID("$Id: builtin_functions.c,v 1.234 2000/02/02 00:38:27 hubbe Exp $");   #include "interpret.h"   #include "svalue.h"   #include "pike_macros.h"
6017: Inside #if defined(PIKE_DEBUG)
   ADD_EFUN("_describe",f__describe,    tFunc(tSetvar(1,tMix),tVar(1)),OPT_SIDE_EFFECT);   #endif +  +  ADD_EFUN("_gc_status",f__gc_status, +  tFunc(tNone,tMap(tString,tOr(tInt,tFloat))), +  OPT_EXTERNAL_DEPEND);   }