removed troublesome M_PI and M_PIl constants

1 files changed, 2 insertions, 1 deletions

diff --git a/unsupported/test/FFTW.cpp b/unsupported/test/FFTW.cpp
index cf7be75aa..fdb41f2e0 100644
--- a/unsupported/test/FFTW.cpp
+++ b/unsupported/test/FFTW.cpp
@@ -45,10 +45,11 @@ complex<long double>  promote(long double x) { return complex<long double>( x);
     {
         long double totalpower=0;
         long double difpower=0;
+        long double pi = acos(-1);
         cerr <<"idx\ttruth\t\tvalue\t|dif|=\n";
         for (size_t k0=0;k0<fftbuf.size();++k0) {
             complex<long double> acc = 0;
-            long double phinc = -2.*k0* M_PIl / timebuf.size();
+            long double phinc = -2.*k0* pi / timebuf.size();
             for (size_t k1=0;k1<timebuf.size();++k1) {
                 acc +=  promote( timebuf[k1] ) * exp( complex<long double>(0,k1*phinc) );
             }