Branch: Tag:

1999-10-26

1999-10-26 00:08:15 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

fixed type checking for AUTO_BIGNUM

Rev: src/bignum.c:1.8
Rev: src/bignum.h:1.8
Rev: src/builtin_functions.c:1.193
Rev: src/pike_types.c:1.58

5:   \*/   /**/   #include "global.h" - RCSID("$Id: builtin_functions.c,v 1.192 1999/10/22 02:35:53 hubbe Exp $"); + RCSID("$Id: builtin_functions.c,v 1.193 1999/10/26 00:08:14 hubbe Exp $");   #include "interpret.h"   #include "svalue.h"   #include "pike_macros.h"
336:   void f_random(INT32 args)   {    INT_TYPE i; +  if(sp[-args].type == T_OBJECT) +  { +  pop_n_elems(args-1); +  apply(sp[-1].u.object,"_random",0); +  return; +  } +     get_all_args("random",args,"%i",&i);       if(i <= 0)