trunk/makegsl

   1 #!/usr/bin/perl -w
   2
   3
   4 use Config;
   5 # Build.PL needs to do this
   6
   7 my $archlib = $Config{archlib};
   8 my $swig = "swig";
   9 my $opt  = "-shadow -Wall -perl5";
  10
  11 my @swigs = qw/
  12     Blas Block Bspline Cblas Cdf Chebyshev CheckRange Combination Complex
  13     Const Deriv Dft Dht Diff Eigen Errno Fft Fit Heapsort Histogram Histogram2d
  14     Ieee_utils Integration Interp Linalg Machine Math Matrix Message Min Mode Monte
  15     Multifit Multimin Multiroots Nan Ntuple Odeiv Permutation Permute Poly Pow_int Precision
  16     Qrng Randist Rng Roots Sf Siman Sort Specfunc Spline Statistics Sum Sys Test Types Vector
  17     Version Wavelet Wavelet2d
  18    /;
  19
  20 # to do all
  21 #map { system "$swig $opt -module Math::GSL::$_ $_.i" } @swigs;
  22
  23 system "$swig $opt -module Math::GSL::Sf Sf.i";
  24
  25 my $cmd2= q{gcc -Wall -fpic -c Sf_wrap.c  -Dbool=char -I}.$archlib.q{/CORE -I/usr/local/include/};
  26
  27 my $cmd3= q{ gcc -L/usr/local/lib -shared Sf_wrap.o -lgsl -o Sf.so};
  28
  29 system "$cmd2 && $cmd3";