StarPU Handbook

- Main Page
- Related Pages
- Modules
- Data Structures
- Files

- File List
- Globals

All Data Structures Files Functions Variables Typedefs Enumerations Enumerator Groups Pages
starpu_rand.h
Go to the documentation of this file.
1 /* StarPU --- Runtime system for heterogeneous multicore architectures.
2 *
3 * Copyright (C) 2012, 2013 Centre National de la Recherche Scientifique
4 *
5 * StarPU is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU Lesser General Public License as published by
7 * the Free Software Foundation; either version 2.1 of the License, or (at
8 * your option) any later version.
9 *
10 * StarPU is distributed in the hope that it will be useful, but
11 * WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
13 *
14 * See the GNU Lesser General Public License in COPYING.LGPL for more details.
15 */
16
17 #ifndef __STARPU_RAND_H__
18 #define __STARPU_RAND_H__
19
20 #include <stdlib.h>
21 #include <starpu_config.h>
22
23 #ifdef __cplusplus
24 extern "C"
25 {
26 #endif
27
28 #ifdef STARPU_USE_DRAND48
29 # define starpu_srand48(seed) srand48(seed)
30 # define starpu_drand48() drand48()
31 # define starpu_erand48(xsubi) erand48(xsubi)
32 # ifdef STARPU_USE_ERAND48_R
33 typedef struct drand48_data starpu_drand48_data;
34 # define starpu_srand48_r(seed, buffer) srand48_r(seed, buffer)
35 # define starpu_erand48_r(xsubi, buffer, result) erand48_r(xsubi, buffer, result)
36 #else
37 typedef int starpu_drand48_data;
38 # define starpu_srand48_r(seed, buffer) srand48(seed)
39 # define starpu_erand48_r(xsubi, buffer, result) do {*(result) = erand48(xsubi); } while (0)
40 # endif
41 #else
42 typedef int starpu_drand48_data;
43 # define starpu_srand48(seed) srand(seed)
44 # define starpu_drand48() (double)(rand()) / RAND_MAX
45 # define starpu_erand48(xsubi) starpu_drand48()
46 # define starpu_srand48_r(seed, buffer) srand((unsigned int)seed)
47 # define starpu_erand48_r(xsubi, buffer, result) do {*(result) = ((double)(rand()) / RAND_MAX);} while (0)
48 #endif
49
50 #ifdef __cplusplus
51 }
52 #endif
53
54 #endif /* __STARPU_RAND_H__ */
starpu_config.h