Commit f56bd719 authored by Antoine Lucas's avatar Antoine Lucas
Browse files

MING replaced by WIN32

parent fa08d8b5
Package: amap Package: amap
Version: 0.8-4 Version: 0.8-5
Date: 2009-05-18 Date: 2010-01-21
Suggests: Biobase Suggests: Biobase
Title: Another Multidimensional Analysis Package Title: Another Multidimensional Analysis Package
Author: Antoine Lucas Author: Antoine Lucas
......
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
* \brief all functions requiered for R dist function and C hcluster function. * \brief all functions requiered for R dist function and C hcluster function.
* *
* \date Created: probably in 1995 * \date Created: probably in 1995
* \date Last modified: Time-stamp: <2007-10-03 20:05:41 antoine> * \date Last modified: Time-stamp: <2010-01-21 18:42:14 antoine>
* *
* \author R core members, and lately: Antoine Lucas * \author R core members, and lately: Antoine Lucas
* *
...@@ -47,7 +47,7 @@ ...@@ -47,7 +47,7 @@
#include <R_ext/Error.h> #include <R_ext/Error.h>
#include <limits> #include <limits>
#ifndef __MINGW_H #ifndef WIN32
#include <pthread.h> #include <pthread.h>
#endif #endif
...@@ -682,7 +682,7 @@ template<class T> void distance_T<T>::distance(double *x, int *nr, ...@@ -682,7 +682,7 @@ template<class T> void distance_T<T>::distance(double *x, int *nr,
res = 0 => missings values */ res = 0 => missings values */
#ifndef __MINGW_H #ifndef WIN32
pthread_t * th = (pthread_t *) malloc ( *nbprocess * sizeof(pthread_t)); pthread_t * th = (pthread_t *) malloc ( *nbprocess * sizeof(pthread_t));
for (i=0; i < *nbprocess ; i++) for (i=0; i < *nbprocess ; i++)
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment