From 25c5d2658cd30a199c4263aeaad5c9f603dd758f Mon Sep 17 00:00:00 2001 From: joost Date: Sun, 26 Apr 2009 20:17:14 +0000 Subject: [PATCH] * Reverted work-around from r12744 now bug #12985 is fixed git-svn-id: trunk@13049 - --- packages/fftw/src/fftw_s.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/packages/fftw/src/fftw_s.pas b/packages/fftw/src/fftw_s.pas index 79b21c8228..08d0f3489a 100644 --- a/packages/fftw/src/fftw_s.pas +++ b/packages/fftw/src/fftw_s.pas @@ -91,7 +91,7 @@ function fftw_plan_dft(rank:cardinal;n:Pcardinal;i:Pcomplex_single;o:Psingle; procedure fftw_destroy_plan(plan:fftw_plan_single); external 'fftw3f' name 'fftwf_destroy_plan'; -procedure fftw_execute(plan:fftw_plan_single); cdecl; // Added 'cdecl' as a temporary workaround for bug 12985 +procedure fftw_execute(plan:fftw_plan_single); external 'fftw3f' name 'fftwf_execute'; {$calling register} {Back to normal!}