Fix the SWIG startup stuff.

diff --git a/foosrank.i b/foosrank.i
index 4b6b4663bfd72ad151ea2ab07e6444d0ecbaba63..c207e4f0df9fb867d7e269f7dc9d4d9a84ff7579 100644 (file)
--- a/foosrank.i
+++ b/foosrank.i
@@ -1,6 +1,6 @@
 %module foosrank
 %{
-void fftw_import_wisdom_from_file(FILE*);
+extern "C" void fftw_import_wisdom_from_file(FILE*);
 void compute_new_rating(double mu1, double sigma1, double mu2, double sigma2, int score1, int score2, double *mu, double *sigma, double *probability);
 void startup() {
         FILE *fp = fopen("fftw-wisdom", "rb");
@@ -13,8 +13,8 @@ void startup() {
 %perlcode %{
         sub import {
                 startup();
-       }
+        }
 %}
 
-//extern void import();
+void startup();
 extern void compute_new_rating(double, double, double, double, int, int, double *OUTPUT, double *OUTPUT, double *OUTPUT);