X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fop%2Fregexp.t;h=244ed4ab99460267a0b8ebd03a35125d24de6cbd;hb=e4d48cc9bddb8984cf12bdfbcbac9580d192b5a5;hp=7e43526f63f7410cb453b3d4b9c3dc9c445f83ed;hpb=b85d18e97b6ae9e0cc168f99b999fd3fd33104bd;p=p5sagit%2Fp5-mst-13.2.git diff --git a/t/op/regexp.t b/t/op/regexp.t index 7e43526..244ed4a 100755 --- a/t/op/regexp.t +++ b/t/op/regexp.t @@ -26,6 +26,13 @@ # If you want to add a regular expression test that can't be expressed # in this format, don't add it here: put it in op/pat.t instead. +BEGIN { + chdir 't' if -d 't'; + @INC = '../lib' if -d '../lib'; +} + +use re 'eval'; + $iters = shift || 1; # Poor man performance suite, 10000 is OK. open(TESTS,'op/re_tests') || open(TESTS,'t/op/re_tests') ||