From 07c65dd561f576c053e0dbfc4502a039bb8560db Mon Sep 17 00:00:00 2001 From: leto Date: Tue, 22 Apr 2008 03:31:01 +0000 Subject: [PATCH] create some consistency in naming --- trunk/{Blas.i => BLAS.i} | 2 +- trunk/{Cblas.i => CBLAS.i} | 2 +- trunk/{Cdf.i => CDF.i} | 2 +- trunk/{Dft.i => DFT.i} | 2 +- trunk/{Dht.i => DHT.i} | 2 +- trunk/{Fft.i => FFT.i} | 2 +- trunk/{Nan.i => NAN.i} | 2 +- trunk/{Odeiv.i => ODEIV.i} | 2 +- trunk/{Qrng.i => QRNG.i} | 2 +- trunk/{Rng.i => RNG.i} | 4 ++-- trunk/{Sf.i => SF.i} | 2 +- trunk/lib/Math/GSL.pm | 2 ++ trunk/makegsl | 16 ++++++++-------- trunk/t/{Sf.t => SF.t} | 0 trunk/testgsl | 4 ++-- 15 files changed, 24 insertions(+), 22 deletions(-) rename trunk/{Blas.i => BLAS.i} (90%) rename trunk/{Cblas.i => CBLAS.i} (80%) rename trunk/{Cdf.i => CDF.i} (82%) rename trunk/{Dft.i => DFT.i} (90%) rename trunk/{Dht.i => DHT.i} (78%) rename trunk/{Fft.i => FFT.i} (96%) rename trunk/{Nan.i => NAN.i} (78%) rename trunk/{Odeiv.i => ODEIV.i} (83%) rename trunk/{Qrng.i => QRNG.i} (83%) rename trunk/{Rng.i => RNG.i} (59%) rename trunk/{Sf.i => SF.i} (99%) rename trunk/t/{Sf.t => SF.t} (100%) diff --git a/trunk/Blas.i b/trunk/BLAS.i similarity index 90% rename from trunk/Blas.i rename to trunk/BLAS.i index 4d2d5e8..179e11a 100644 --- a/trunk/Blas.i +++ b/trunk/BLAS.i @@ -1,4 +1,4 @@ -%module Blas +%module BLAS %{ #include "gsl/gsl_blas.h" #include "gsl/gsl_blas_types.h" diff --git a/trunk/Cblas.i b/trunk/CBLAS.i similarity index 80% rename from trunk/Cblas.i rename to trunk/CBLAS.i index 42ffacb..7c713e5 100644 --- a/trunk/Cblas.i +++ b/trunk/CBLAS.i @@ -1,4 +1,4 @@ -%module Cblas +%module CBLAS %{ #include "gsl/gsl_cblas.h" %} diff --git a/trunk/Cdf.i b/trunk/CDF.i similarity index 82% rename from trunk/Cdf.i rename to trunk/CDF.i index b05b877..ecd7971 100644 --- a/trunk/Cdf.i +++ b/trunk/CDF.i @@ -1,4 +1,4 @@ -%module Cdf +%module CDF %{ #include "gsl/gsl_cdf.h" %} diff --git a/trunk/Dft.i b/trunk/DFT.i similarity index 90% rename from trunk/Dft.i rename to trunk/DFT.i index 9d9199e..b185401 100644 --- a/trunk/Dft.i +++ b/trunk/DFT.i @@ -1,4 +1,4 @@ -%module gsl_dft +%module DFT %{ #include "gsl/gsl_dft_complex.h" #include "gsl/gsl_dft_complex_float.h" diff --git a/trunk/Dht.i b/trunk/DHT.i similarity index 78% rename from trunk/Dht.i rename to trunk/DHT.i index 77f0fc2..b560158 100644 --- a/trunk/Dht.i +++ b/trunk/DHT.i @@ -1,4 +1,4 @@ -%module gsl_dht +%module DHT %{ #include "gsl/gsl_dht.h" %} diff --git a/trunk/Fft.i b/trunk/FFT.i similarity index 96% rename from trunk/Fft.i rename to trunk/FFT.i index 0f0f68b..48c1fce 100644 --- a/trunk/Fft.i +++ b/trunk/FFT.i @@ -1,4 +1,4 @@ -%module gsl_fft +%module FFT %{ #include "gsl/gsl_fft.h" #include "gsl/gsl_fft_complex.h" diff --git a/trunk/Nan.i b/trunk/NAN.i similarity index 78% rename from trunk/Nan.i rename to trunk/NAN.i index 004283c..9c05e6d 100644 --- a/trunk/Nan.i +++ b/trunk/NAN.i @@ -1,4 +1,4 @@ -%module gsl_nan +%module NAN %{ #include "gsl/gsl_nan.h" %} diff --git a/trunk/Odeiv.i b/trunk/ODEIV.i similarity index 83% rename from trunk/Odeiv.i rename to trunk/ODEIV.i index 9b0f3b0..6772ede 100644 --- a/trunk/Odeiv.i +++ b/trunk/ODEIV.i @@ -1,4 +1,4 @@ -%module gsl_odeiv +%module ODEIV %{ #include "gsl/gsl_odeiv.h" %} diff --git a/trunk/Qrng.i b/trunk/QRNG.i similarity index 83% rename from trunk/Qrng.i rename to trunk/QRNG.i index b3ef481..683c6df 100644 --- a/trunk/Qrng.i +++ b/trunk/QRNG.i @@ -1,4 +1,4 @@ -%module gsl_qrng +%module QRNG %{ #include "gsl/gsl_qrng.h" %} diff --git a/trunk/Rng.i b/trunk/RNG.i similarity index 59% rename from trunk/Rng.i rename to trunk/RNG.i index a81295f..76a481d 100644 --- a/trunk/Rng.i +++ b/trunk/RNG.i @@ -1,6 +1,6 @@ -%module gsl_rng +%module RNG %{ -#include "gsl/gsl_rng.h" + #include "gsl/gsl_rng.h" %} %import "gsl/gsl_types.h" diff --git a/trunk/Sf.i b/trunk/SF.i similarity index 99% rename from trunk/Sf.i rename to trunk/SF.i index d67aabe..1f612fa 100644 --- a/trunk/Sf.i +++ b/trunk/SF.i @@ -1,4 +1,4 @@ -%module Sf +%module SF %{ #include "gsl/gsl_sf.h" #include "gsl/gsl_sf_airy.h" diff --git a/trunk/lib/Math/GSL.pm b/trunk/lib/Math/GSL.pm index 373160c..2413b54 100644 --- a/trunk/lib/Math/GSL.pm +++ b/trunk/lib/Math/GSL.pm @@ -3,6 +3,8 @@ package Math::GSL; use warnings; use strict; +my $VERSION = 0.01; + =head1 NAME Math::GSL - OO Perl interface to the GNU Scientific Library (GSL) diff --git a/trunk/makegsl b/trunk/makegsl index fd7d68d..e285d9c 100755 --- a/trunk/makegsl +++ b/trunk/makegsl @@ -11,22 +11,22 @@ my $swig = "swig"; my $opt = "-shadow -Wall -perl5"; my @swigs = qw/ - Blas Block Bspline Cblas Cdf Chebyshev CheckRange Combination Complex - Const Deriv Dft Dht Diff Eigen Errno Fft Fit Heapsort Histogram Histogram2d - Ieee_utils Integration Interp Linalg Machine Math Matrix Message Min Mode Monte - Multifit Multimin Multiroots Nan Ntuple Odeiv Permutation Permute Poly Pow_int Precision - Qrng Randist Rng Roots Sf Siman Sort Specfunc Spline Statistics Sum Sys Test Types Vector + BLAS Block Bspline CBLAS CDF Chebyshev CheckRange Combination Complex + Const Deriv DFT DHT Diff Eigen Errno FFT Fit Heapsort Histogram Histogram2d + IEEEUtils Integration Interp Linalg Machine Math Matrix Message Min Mode Monte + Multifit Multimin Multiroots NAN Ntuple ODEIV Permutation Permute Poly PowInt Precision + QRNG Randist RNG Roots SF Siman Sort Specfunc Spline Statistics Sum Sys Test Types Vector Version Wavelet Wavelet2d /; # to do all #map { system "$swig $opt -module Math::GSL::$_ $_.i" } @swigs; -system "$swig $opt -module Math::GSL::Sf Sf.i"; +system "$swig $opt -module Math::GSL::SF SF.i"; -my $cmd2= q{ gcc -Wall -fpic -c Sf_wrap.c -Dbool=char -I}.$archlib.q{/CORE -I/usr/local/include/}; +my $cmd2= q{ gcc -Wall -fpic -c SF_wrap.c -Dbool=char -I}.$archlib.q{/CORE -I/usr/local/include/}; -my $cmd3= q{ gcc -L/usr/local/lib -shared Sf_wrap.o -lgsl -o Sf.so}; +my $cmd3= q{ gcc -L/usr/local/lib -shared SF_wrap.o -lgsl -o SF.so}; print "Running $cmd2 && $cmd3\n"; system "$cmd2 && $cmd3"; diff --git a/trunk/t/Sf.t b/trunk/t/SF.t similarity index 100% rename from trunk/t/Sf.t rename to trunk/t/SF.t diff --git a/trunk/testgsl b/trunk/testgsl index ddf461b..ca479fc 100755 --- a/trunk/testgsl +++ b/trunk/testgsl @@ -1,7 +1,7 @@ #!/usr/bin/perl -w use Test::More tests=> 2; -use Sf; +use SF; my $eps = 1e-8; @@ -11,7 +11,7 @@ my %results = ( ); while (my($k,$v)=each %results){ - my $x = eval "Math::GSL::Sf::$k"; + my $x = eval "Math::GSL::SF::$k"; my $res = abs($x - $v); ok( $res < $eps, "$k ?= $x, res=$res" ); } -- 2.11.4.GIT