Move the require './test.pl' to the end of t/comp/hints.t
[p5sagit/p5-mst-13.2.git] / t / op / sub.t
CommitLineData
f7218ed4 1#!./perl -w
2d981f27 2
3BEGIN {
4 chdir 't' if -d 't';
5 @INC = '../lib';
f7218ed4 6 require './test.pl';
2d981f27 7}
8
f7218ed4 9plan( tests => 4 );
2d981f27 10
11sub empty_sub {}
12
13is(empty_sub,undef,"Is empty");
14is(empty_sub(1,2,3),undef,"Is still empty");
15@test = empty_sub();
16is(scalar(@test), 0, 'Didnt return anything');
17@test = empty_sub(1,2,3);
18is(scalar(@test), 0, 'Didnt return anything');
19