]>
git.cameronkatri.com Git - bsdgames-darwin.git/blob - warp/util.h
1 /* Header: util.h,v 7.0 86/10/08 15:14:37 lwall Exp */
4 * Revision 7.0 86/10/08 15:14:37 lwall
5 * Split into separate files. Added amoebas and pirates.
9 #if RANDBITS < 15 || defined(lint)
10 #define rand_mod(m) getpid()
13 #define myrand() getpid()
15 #if RANDBITS == 15 /* 15 bits of rand()? */
16 #define RANDRAND 268435456.0 /* that's 2**28 */
17 #define HALFRAND 0x4000 /* that's 2**14 */
19 #define myrand() (rand()&32767)
20 #define rand_mod(m) ((int)((double)myrand() / 32768.0 * ((double)(m))))
21 /* pick number in 0..m-1 */
25 #if RANDBITS < 31 /* 16 bits of rand()? */
26 #define RANDRAND 1073741824.0 /* that's 2**30 */
27 #define HALFRAND 0x8000 /* that's 2**15 */
29 #define myrand() (rand()&65535)
30 #define rand_mod(m) ((int)((double)myrand() / 65536.0 * ((double)(m))))
31 /* pick number in 0..m-1 */
33 #else /* assume 31 bits */
34 #define RANDRAND 1152921504606846976.0 /* that's 2**60 */
35 #define HALFRAND 0x40000000 /* that's 2**30 */
37 #define myrand() rand()
38 #define rand_mod(m) ((myrand() / 37) % (m)) /* pick number in 0..m-1 */
40 * The reason for the /37 above is that our random number generator yields
41 * successive evens and odds, for some reason. This makes strange star maps.
48 /* we get fractions of seconds from calling ftime on timebuf */
50 EXT
struct timeb timebuf
;
51 #define roundsleep(x) (ftime(&timebuf),sleep(timebuf.millitm > 500?x+1:x))
57 EXT
bool waiting
INIT(FALSE
); /* are we waiting for subprocess (in doshell)? */
60 EXT
int len_last_line_got
INIT(0);
61 /* strlen of some_buf after */
62 /* some_buf = get_a_line(bufptr,buffersize,fp) */
66 /* is the string for makedir a directory name or a filename? */