mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-08-21 22:06:34 -04:00
Also complete the wrapper code in wisdom.c. TBD: should be possible to use fftw3f.f03 instead of the ad hoc wisdom.c. git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@4617 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
14 lines
350 B
C
14 lines
350 B
C
void export_wisdom_(char fname[], int len)
|
|
{
|
|
int fftwf_export_wisdom_to_filename(const char *);
|
|
fname[len-1]=0;
|
|
fftwf_export_wisdom_to_filename(fname);
|
|
}
|
|
|
|
void import_wisdom_(char fname[], int *success, int len)
|
|
{
|
|
int fftwf_import_wisdom_from_filename(const char *);
|
|
fname[len-1]=0;
|
|
*success = fftwf_import_wisdom_from_filename(fname);
|
|
}
|