diff options
Diffstat (limited to 'packages')
-rw-r--r-- | packages/base/src/Internal/C/vector-aux.c | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/packages/base/src/Internal/C/vector-aux.c b/packages/base/src/Internal/C/vector-aux.c index 0b6b8b6..9dbf536 100644 --- a/packages/base/src/Internal/C/vector-aux.c +++ b/packages/base/src/Internal/C/vector-aux.c | |||
@@ -932,14 +932,19 @@ int vectorScan(char * file, int* n, double**pp){ | |||
932 | 932 | ||
933 | //////////////////////////////////////////////////////////////////////////////// | 933 | //////////////////////////////////////////////////////////////////////////////// |
934 | 934 | ||
935 | #if defined (__APPLE__) || (__FreeBSD__) || defined(_WIN32) || defined(WIN32) | 935 | #if defined (__APPLE__) || (__FreeBSD__) |
936 | /* FreeBSD and Mac OS X do not provide random_r(), thread safety cannot be | 936 | /* FreeBSD and Mac OS X do not provide random_r(), thread safety cannot be |
937 | guaranteed. | 937 | guaranteed. |
938 | For FreeBSD and Mac OS X, nrand48() is much better than random(). | 938 | For FreeBSD and Mac OS X, nrand48() is much better than random(). |
939 | See: http://www.evanjones.ca/random-thread-safe.html | 939 | See: http://www.evanjones.ca/random-thread-safe.html |
940 | */ | 940 | */ |
941 | #pragma message "randomVector is not thread-safe in OSX and FreeBSD" | 941 | #pragma message "randomVector is not thread-safe in OSX and FreeBSD" |
942 | #endif | ||
942 | 943 | ||
944 | #if defined (__APPLE__) || (__FreeBSD__) || defined(_WIN32) || defined(WIN32) | ||
945 | /* Windows use thread-safe random | ||
946 | See: http://stackoverflow.com/questions/143108/is-windows-rand-s-thread-safe | ||
947 | */ | ||
943 | inline double urandom() { | 948 | inline double urandom() { |
944 | /* the probalility of matching will be theoretically p^3(in fact, it is not) | 949 | /* the probalility of matching will be theoretically p^3(in fact, it is not) |
945 | p is matching probalility of random(). | 950 | p is matching probalility of random(). |