source: src/tests/random.c@ a8615fd1

ADT aaron-thesis arm-eh ast-experimental cleanup-dtors deferred_resn demangler enum forall-pointer-decay jacob/cs343-translation jenkins-sandbox new-ast new-ast-unique-expr no_list persistent-indexer pthread-emulation qualifiedEnum
Last change on this file since a8615fd1 was 54aba8d, checked in by Peter A. Buhr <pabuhr@…>, 8 years ago

change name of random_seed to srandom, and make all random calls through rand48

  • Property mode set to 100644
File size: 1.7 KB
Line 
1//
2// Cforall Version 1.0.0 Copyright (C) 2016 University of Waterloo
3//
4// The contents of this file are covered under the licence agreement in the
5// file "LICENCE" distributed with Cforall.
6//
7// random.c --
8//
9// Author : Peter A. Buhr
10// Created On : Tue Jul 5 21:29:30 2016
11// Last Modified By : Peter A. Buhr
12// Last Modified On : Tue Jan 2 12:19:34 2018
13// Update Count : 19
14//
15
16#include <fstream>
17#include <stdlib> // random
18#include <unistd.h> // getpid
19
20int main() {
21 // srandom( getpid() ); // set random seed
22 srandom( 1003 ); // fixed seed for repeatable tests
23
24 // test polymorphic calls to random and stream
25 char c = random();
26 sout | c | endl;
27 c = random( 'A' );
28 sout | c | endl;
29 c = random( 'A', 'Z' );
30 sout | c | endl;
31
32 int i = random();
33 sout | i | endl;
34 i = random( 10 );
35 sout | i | endl;
36 i = random( -10, 20 );
37 sout | i | endl;
38
39 unsigned int ui = random();
40 sout | ui | endl;
41 ui = random( 10u );
42 sout | ui | endl;
43 ui = random( 10u, 20u );
44 sout | ui | endl;
45
46 long int li = random();
47 sout | li | endl;
48 li = random( 10l );
49 sout | li | endl;
50 li = random( -10l, 20l );
51 sout | li | endl;
52
53 unsigned long int uli = random();
54 sout | uli | endl;
55 uli = random( 10ul );
56 sout | uli | endl;
57 uli = random( 10ul, 20ul );
58 sout | uli | endl;
59
60 float f = random();
61 sout | f | endl;
62
63 double d = random();
64 sout | d | endl;
65
66 float _Complex fc = random();
67 sout | fc | endl;
68
69 double _Complex dc = random();
70 sout | dc | endl;
71
72 long double _Complex ldc = random();
73 sout | ldc | endl;
74} // main
75
76// Local Variables: //
77// tab-width: 4 //
78// compile-command: "cfa random.c" //
79// End: //
Note: See TracBrowser for help on using the repository browser.