Browse Source

* fixed range check error

git-svn-id: trunk@6823 -
Jonas Maebe 18 years ago
parent
commit
fc3d9ebbc7
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/extra/fftw/fftw_s.pas

+ 1 - 1
packages/extra/fftw/fftw_s.pas

@@ -32,7 +32,7 @@ type    complex_single=record
 
 
         fftw_plan_single=type pointer;
         fftw_plan_single=type pointer;
 
 
-        fftw_sign=(fftw_backward=1,fftw_forward=$ffffffff);
+        fftw_sign=(fftw_forward=-1,fftw_backward=1);
 
 
         fftw_flag=(fftw_measure,            {generated optimized algorithm}
         fftw_flag=(fftw_measure,            {generated optimized algorithm}
                    fftw_destroy_input,      {default}
                    fftw_destroy_input,      {default}