diff options
| author | joost <joost@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2009-02-15 18:08:34 +0000 |
|---|---|---|
| committer | joost <joost@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2009-02-15 18:08:34 +0000 |
| commit | d9db0218b331c37208b681c6580ad6865ea56465 (patch) | |
| tree | 70e7f5f403322dee206f7115cd7689c3e4cb2c05 /packages/fftw | |
| parent | 2432c8ce5266ed86f4b10f288e3057493b0610e7 (diff) | |
| download | fpc-d9db0218b331c37208b681c6580ad6865ea56465.tar.gz | |
* Added temporary work-around for bug 12985, partly fixes bug 12881
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@12744 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/fftw')
| -rw-r--r-- | packages/fftw/src/fftw_s.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/packages/fftw/src/fftw_s.pas b/packages/fftw/src/fftw_s.pas index d585121462..dacc8ed806 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); +procedure fftw_execute(plan:fftw_plan_single); cdecl; // Added 'cdecl' as a temporary workaround for bug 12985 external 'fftw3f' name 'fftwf_execute'; {$calling register} {Back to normal!} |