From: Raymond T. <rt...@us...> - 2002-06-28 15:06:08
|
Update of /cvsroot/maxima/maxima/share/numeric In directory usw-pr-cvs1:/tmp/cvs-serv813/share/numeric Modified Files: fft.lisp Log Message: Misplaced declaration. Index: fft.lisp =================================================================== RCS file: /cvsroot/maxima/maxima/share/numeric/fft.lisp,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -u -d -r1.1.1.1 -r1.2 --- fft.lisp 8 May 2000 06:09:43 -0000 1.1.1.1 +++ fft.lisp 28 Jun 2002 15:06:05 -0000 1.2 @@ -41,6 +41,7 @@ (error '|arg to fft//ift//recttopolar//polartorect must be floating point array|)))) +#-cl (declare (flonum x y xa ya) (fixnum i n m1 m2)) |