#!./perl
# Tests to ensure that we don't unexpectedly change prototypes of builtins
-use Test::More tests => 234;
+BEGIN {
+ chdir 't' if -d 't';
+ @INC = '../lib';
+}
+
+BEGIN { require './test.pl'; }
+plan tests => 234;
+
while (<DATA>) {
chomp;
my ($keyword, $proto) = split;