Changeset e07b470 in sasmodels for sasmodels/models/lib/sas_gamma.c

Timestamp:

Apr 26, 2016 9:54:45 AM (9 years ago)

Author:

Paul Kienzle <pkienzle@…>

Branches:

master, core_shell_microgels, costrafo411, magnetic_model, release_v0.94, release_v0.95, ticket-1257-vesicle-product, ticket_1156, ticket_1265_superball, ticket_822_more_unit_tests

Children:

c7b058e

Parents:

bfdfb23

Message:

fix compile errors with sas gamma

File:

• sasmodels/models/lib/sas_gamma.c (modified) (2 diffs)

sasmodels/models/lib/sas_gamma.c

@@ -10 +10 @@
 inline double sas_gamma( double x) { return tgamma(x+1)/x; }
 #else
-double _isnan(double x, double y) { return x != y; }
-#undef isnan
-#define isnan(x) _isnan(x, x)
-
 static double cephes_stirf(double x)
 {
 #define MAXSTIR 143.01608
-        static double SQTPI = 2.50662827463100050242E0;
+#define SQTPI 2.50662827463100050242E0
         double y, w, v;
 
@@ -44 +40 @@
 
 double sas_gamma(double x) {
-        #define MAXGAM 171.624376956302725
-        static double LOGPI = 1.14472988584940017414;
+#define MAXGAM 171.624376956302725
+#define LOGPI 1.14472988584940017414
         double p, q, z;
         int sgngam;