Move Math::BigInt from ext/ to cpan/
[p5sagit/p5-mst-13.2.git] / cpan / Math-BigInt / t / mbi_ali.t
CommitLineData
b282a552 1#!/usr/bin/perl -w
2
3# test that the new alias names work
4
5use Test::More;
6use strict;
7
8BEGIN
9 {
10 $| = 1;
11 # to locate the testing files
12 my $location = $0; $location =~ s/mbi_ali.t//i;
13 if ($ENV{PERL_CORE})
14 {
15 # testing with the core distribution
16 @INC = qw(../t/lib);
17 }
18 unshift @INC, qw(../lib);
19 if (-d 't')
20 {
21 chdir 't';
22 require File::Spec;
23 unshift @INC, File::Spec->catdir(File::Spec->updir, $location);
24 }
25 else
26 {
27 unshift @INC, $location;
28 }
29 print "# INC = @INC\n";
30
31 plan tests => 6;
32 }
33
34use Math::BigInt;
35
36use vars qw/$x $CL/;
37
38$CL = 'Math::BigInt';
39
40require 'alias.inc';
41
42