pike.git/ src/ builtin.cmod

2010-03-23

2010-03-23 12:24:01 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• 5e424b87e4b5b476c5f2e495c863697e6830d0bd (10 lines) (+9/-1) ^{[ Show | Annotate ]}
  Branch: 7.9

Fixed bug in random() for sizes larger than 31 bits, but smaller than the bignum threshold.

Rev: src/builtin.cmod:1.256

2:   || 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.cmod,v 1.255 2010/03/03 16:31:05 srb Exp $ + || $Id: builtin.cmod,v 1.256 2010/03/23 12:24:01 grubba Exp $   */      #include "global.h"
1363:   PIKEFUN int random(int i)   {    if(i <= 0) RETURN 0; + #ifdef AUTO_BIGNUM +  if(i >> 31) { +  unsigned INT_TYPE a = my_rand(); +  unsigned INT_TYPE b = my_rand(); +  RETURN (INT_TYPE)(((a<<32)|b) % i); +  } + #endif    RETURN my_rand() % i;   }