home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 4 / FreshFish_May-June1994.bin / bbs / gnu / gmp-1.3.2-src.lha / src / amiga / gmp-1.3.2 / tests / urandom.h < prev   
Encoding:
C/C++ Source or Header  |  1993-05-03  |  331 b   |  18 lines
  1. #if defined (hpux) || defined (__alpha__)
  2. /* HPUX lacks random().  DEC Alpha's random() returns a double.  */
  3. static inline unsigned long
  4. urandom ()
  5. {
  6.   return mrand48 ();
  7. }
  8. #else
  9. long random ();
  10.  
  11. static inline unsigned long
  12. urandom ()
  13. {
  14.   /* random() returns 31 bits, we want 32.  */
  15.   return random() ^ (random() << 1);
  16. }
  17. #endif
  18.