Return to rand.c CVS log

Up to [CSRG BSD Unix] / 43BSD / lib / libc / compat-4.1

Annotation of 43BSD/lib/libc/compat-4.1/rand.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * Copyright (c) 1980 Regents of the University of California.
                      3:  * All rights reserved.  The Berkeley software License Agreement
                      4:  * specifies the terms and conditions for redistribution.
                      5:  */
                      6: 
                      7: #if defined(LIBC_SCCS) && !defined(lint)
                      8: static char sccsid[] = "@(#)rand.c     5.2 (Berkeley) 3/9/86";
                      9: #endif LIBC_SCCS and not lint
                     10: 
                     11: static long    randx = 1;
                     12: 
                     13: srand(x)
                     14: unsigned x;
                     15: {
                     16:        randx = x;
                     17: }
                     18: 
                     19: rand()
                     20: {
                     21:        return((randx = randx * 1103515245 + 12345) & 0x7fffffff);
                     22: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.