4 * Copyright 2006 Develer S.r.l. (http://www.develer.com/)
5 * Copyright 1999 Bernardo Innocenti <bernie@develer.com>
6 * This file is part of DevLib - See README.devlib for information.
9 * \brief Very simple rand() algorithm.
12 * \author Bernardo Innocenti <bernie@develer.com>
15 /* This would really belong to libc */
18 static unsigned long seed;
21 seed = (seed ^ 0x4BAD5A39UL) + 6513973UL;
23 return (int)(seed>>16);