Mercurial > hg > octave-lyh
comparison liboctave/randmtzig.h @ 5828:22e23bee74c8
[project @ 2006-05-23 06:05:14 by jwe]
author | jwe |
---|---|
date | Tue, 23 May 2006 06:05:14 +0000 |
parents | 2cd0af543e7a |
children | 4c16f3104aa5 |
comparison
equal
deleted
inserted
replaced
5827:1fe78adb91bc | 5828:22e23bee74c8 |
---|---|
52 | 52 |
53 #ifdef __cplusplus | 53 #ifdef __cplusplus |
54 extern "C" { | 54 extern "C" { |
55 #endif | 55 #endif |
56 | 56 |
57 #ifdef HAVE_INTTYPES_H | |
58 #include <inttypes.h> | |
59 #else | |
60 #if SIZEOF_INT == 4 | |
61 typedef unsigned int uint32_t; | |
62 #elif SIZEOF_LONG == 4 | |
63 typedef unsigned long uint32_t; | |
64 #else | |
65 #error "No 4 byte integer type found!" | |
66 #endif | |
67 | |
68 #if SIZEOF_LONG == 8 | |
69 typedef unsigned long uint64_t; | |
70 #else | |
71 #if SIZEOF_LONG_LONG == 8 | |
72 typedef unsigned long long uint64_t; | |
73 #endif | |
74 #endif | |
75 #endif | |
76 | |
77 /* === Mersenne Twister === */ | 57 /* === Mersenne Twister === */ |
78 extern void oct_init_by_int (uint32_t s); | 58 extern void oct_init_by_int (uint32_t s); |
79 extern void oct_init_by_array (uint32_t init_key[], int key_length); | 59 extern void oct_init_by_array (uint32_t init_key[], int key_length); |
80 extern void oct_init_by_entropy (void); | 60 extern void oct_init_by_entropy (void); |
81 extern void oct_set_state (uint32_t save[]); | 61 extern void oct_set_state (uint32_t save[]); |