Root/
| 1 | /*␊ |
| 2 | *␊ |
| 3 | * rand & srand implementation for chameleon by Cadet-petit Armel <armelcadetpetit@gmail.com>␊ |
| 4 | */␊ |
| 5 | ␊ |
| 6 | #include "libsa.h"␊ |
| 7 | ␊ |
| 8 | static long holdrand = 1L;␊ |
| 9 | #define␉RAND_MAX␉0x7fffffff␊ |
| 10 | ␊ |
| 11 | void srand (unsigned int seed)␊ |
| 12 | {␊ |
| 13 | ␉holdrand = (long)seed;␊ |
| 14 | }␊ |
| 15 | ␊ |
| 16 | int rand (void)␊ |
| 17 | {␉␊ |
| 18 | ␉holdrand = holdrand * 214013L + 2531011L;␊ |
| 19 | ␉return ((holdrand >> 16) & RAND_MAX);␊ |
| 20 | } |
