diff options
author | Karl Berry <karl@freefriends.org> | 2015-05-11 22:12:25 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2015-05-11 22:12:25 +0000 |
commit | 0417a4fa56359c545358f5fb8c9b3f88a1845db2 (patch) | |
tree | ed331ec191a82fe896f05005dee844269e406281 /Build/source/utils/asymptote/runarray.in | |
parent | e7256bd4adc1d8df03ed8434e3f9cc15817b6f22 (diff) |
asy 2.33 sources
git-svn-id: svn://tug.org/texlive/trunk@37343 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/utils/asymptote/runarray.in')
-rw-r--r-- | Build/source/utils/asymptote/runarray.in | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/Build/source/utils/asymptote/runarray.in b/Build/source/utils/asymptote/runarray.in index c9f80a12297..ca2f0bc6d39 100644 --- a/Build/source/utils/asymptote/runarray.in +++ b/Build/source/utils/asymptote/runarray.in @@ -1044,8 +1044,8 @@ array* :array3Transpose(array *a, array *perm) } } - delete [] i; - delete [] size; + delete[] i; + delete[] size; return c; } @@ -1109,7 +1109,7 @@ realarray2 *inverse(realarray2 *a) copyArray2C(A,a,true,0,NoGC); inverse(A,n); a=copyCArray2(n,n,A); - delete A; + delete[] A; return a; } @@ -1611,8 +1611,8 @@ real simpson(callableReal *f, real a, real b, real acc=DBL_EPSILON, // Compute the fast Fourier transform of a pair array pairarray* fft(pairarray *a, Int sign=1) { - unsigned n=(unsigned) checkArray(a); #ifdef HAVE_LIBFFTW3 + unsigned n=(unsigned) checkArray(a); array *c=new array(n); if(n) { Complex *f=fftwpp::ComplexAlign(n); @@ -1631,7 +1631,6 @@ pairarray* fft(pairarray *a, Int sign=1) fftwpp::deleteAlign(f); } #else - unused(&n); unused(&sign); array *c=new array(0); error("Please install fftw3, run ./configure, and recompile"); |