]> git.vpit.fr Git - perl/modules/Test-Leaner.git/blob - t/01-import.t
Document two more differences with Test::More
[perl/modules/Test-Leaner.git] / t / 01-import.t
1 #!perl -T
2
3 use strict;
4 use warnings;
5
6 use Test::More ();
7
8 BEGIN { *tm_is = \&Test::More::is }
9
10 Test::More::plan(tests => 2 * 15);
11
12 require Test::Leaner;
13
14 my @syms = qw<
15  plan
16  skip
17  done_testing
18  pass
19  fail
20  ok
21  is
22  isnt
23  like
24  unlike
25  cmp_ok
26  is_deeply
27  diag
28  note
29  BAIL_OUT
30 >;
31
32 for (@syms) {
33  eval { Test::Leaner->import(import => [ $_ ]) };
34  tm_is $@,            '',                          "import $_";
35  tm_is prototype($_), prototype("Test::More::$_"), "prototype $_";
36 }