Changeset c7b058e in sasmodels

Timestamp:

Apr 26, 2016 12:18:20 PM (8 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:

e9dc7df

Parents:

e07b470

Message:

code cleanup: don't leak #defines from cephes tgamma function

File:

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

sasmodels/models/lib/sas_gamma.c

@@ -12 +12 @@
 static double cephes_stirf(double x)
 {
-#define MAXSTIR 143.01608
-#define SQTPI 2.50662827463100050242E0
+        const double MAXSTIR=143.01608;
+        const double SQTPI=2.50662827463100050242E0;
         double y, w, v;
 
@@ -40 +40 @@
 
 double sas_gamma(double x) {
-#define MAXGAM 171.624376956302725
-#define LOGPI 1.14472988584940017414
+        const double MAXGAM=171.624376956302725;
+        const double LOGPI=1.14472988584940017414;
         double p, q, z;
         int sgngam;