*** empty log message ***

entghost.c

@@ -24,6 +24,12 @@
 #include <stream.h>
 #include "newmatio.h"
 
+#if HAVE_ISNAN
+ #define Xisnan(s) (isnan(s))
+#else
+ #define Xisnan(s) (0)
+#endif
+
 #include "miscmaths/optimise.h"
 using namespace MISCMATHS;
 
@@ -198,7 +204,7 @@ double calc_entropy(float *data,long imsize)
   s=0;
   for(l=0;l<100;l++){
     t=((double)hist[l]/(double)imsize)*log((double)hist[l]/(double)imsize);
-    if(!isnan(t))
+    if(!Xisnan(t))
       s-=t;
   }
   return(s/log(100.0));