Fix broken lrand48() implementation, per Merlin Moncure.

tglsfdc · tglsfdc · commit 0f455b346ee2 · 2005-08-23T13:31:11.000Z
diff --git a/src/port/rand.c b/src/port/rand.c
@@ -63,7 +63,7 @@ long
 lrand48(void)
 {
 	_dorand48(_rand48_seed);
-	return ((long) _rand48_seed[2] << 15) + ((long) _rand48_seed[1] > 1);
+	return ((long) _rand48_seed[2] << 15) + ((long) _rand48_seed[1] >> 1);
 }
 
 void

Original file line number	Diff line number	Diff line change
`@@ -63,7 +63,7 @@ long`
`63`	`63`	`lrand48(void)`
`64`	`64`	`{`
`65`	`65`	`_dorand48(_rand48_seed);`
`66`		`- return ((long) _rand48_seed[2] << 15) + ((long) _rand48_seed[1] > 1);`
	`66`	`+ return ((long) _rand48_seed[2] << 15) + ((long) _rand48_seed[1] >> 1);`
`67`	`67`	`}`
`68`	`68`
`69`	`69`	`void`