@@ -1342,6 +1342,49 @@ end
13421342@deprecate  srand (filename:: AbstractString , n:: Integer = 4 ) srand (read! (filename, Array {UInt32} (Int (n))))
13431343@deprecate  MersenneTwister (filename:: AbstractString )  srand (MersenneTwister (0 ), read! (filename, Array {UInt32} (Int (4 ))))
13441344
1345+ #  PR #21956
1346+ macro  _depfftw (f)
1347+     quote 
1348+         function  $ (esc (f))(args... ; kwargs... )
1349+             error ($ f, "  has been moved to the package FFTW.jl.\n "  ,
1350+                   " Run `Pkg.add(\" FFTW\" )` to install FFTW on Julia v0.7 and later, "  ,
1351+                   " and then run `using FFTW` to load it."  )
1352+         end 
1353+         export  $ (esc (f))
1354+     end 
1355+ end 
1356+ function  _fftwie (mod:: Module )
1357+     s =  Symbol (mod)
1358+     vars =  filter (n ->  n != =  s, names (mod))
1359+     imports =  map (v ->  Expr (:import , s, v), vars)
1360+     return  Expr (:toplevel , imports... , Expr (:export , vars... ))
1361+ end 
1362+ 
1363+ module  DFT
1364+     for  f in  [:bfft , :bfft! , :brfft , :dct , :dct! , :fft , :fft! , :fftshift , :idct , :idct! ,
1365+               :ifft , :ifft! , :ifftshift , :irfft , :plan_bfft , :plan_bfft! , :plan_brfft ,
1366+               :plan_dct , :plan_dct! , :plan_fft , :plan_fft! , :plan_idct , :plan_idct! ,
1367+               :plan_ifft , :plan_ifft! , :plan_irfft , :plan_rfft , :rfft ]
1368+         @eval  Base. @_depfftw ($ f)
1369+     end 
1370+     module  FFTW
1371+         for  f in  [:r2r , :r2r! , :plan_r2r , :plan_r2r! ]
1372+             @eval  Base. @_depfftw ($ f)
1373+         end 
1374+     end 
1375+ end 
1376+ @eval  _fftwie ($ DFT)
1377+ 
1378+ const  FFTW =  DFT. FFTW
1379+ export  FFTW
1380+ 
1381+ module  DSP
1382+     for  f in  [:conv , :conv2 , :deconv , :filt , :filt! , :xcorr ]
1383+         @eval  Base. @_depfftw ($ f)
1384+     end 
1385+ end 
1386+ @eval  _fftwie ($ DSP)
1387+ 
13451388#  END 0.7 deprecations
13461389
13471390#  BEGIN 1.0 deprecations
0 commit comments