Setup @INC.

p4raw-id: //depot/perl@20948

diff --git a/t/op/cproto.t b/t/op/cproto.t
index 26850c0..fce11e0 100644 (file)
--- a/t/op/cproto.t
+++ b/t/op/cproto.t
@@ -1,6 +1,11 @@
 #!./perl
 # Tests to ensure that we don't unexpectedly change prototypes of builtins
 
+BEGIN {
+    chdir 't' if -d 't';
+    @INC = '../lib';
+}
+
 use Test::More tests => 234;
 while (<DATA>) {
     chomp;