This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Make t/comp/parser.t get the correct libraries.
authorCraig A. Berry <craigberry@mac.com>
Mon, 1 Jul 2013 02:09:21 +0000 (21:09 -0500)
committerCraig A. Berry <craigberry@mac.com>
Mon, 1 Jul 2013 02:09:21 +0000 (21:09 -0500)
In principle it shouldn't need libraries, but an eval of a utf8
constant now triggers automatic loading of utf8.pm, and it was
looking for that in the usual @INC locations set at configuration
time.  Which just might match an installed perl rather than the
perl being tested.  So make sure we get the correct libraries.

t/comp/parser.t

index fa11de9..38a7dc8 100644 (file)
@@ -3,6 +3,11 @@
 # Checks if the parser behaves correctly in edge cases
 # (including weird syntax errors)
 
+BEGIN {
+    @INC = qw(. ../lib);
+    chdir 't';
+}
+
 print "1..156\n";
 
 sub failed {
@@ -476,7 +481,7 @@ $test
 
 # bug #74022: Loop on characters in \p{OtherIDContinue}
 # This test hangs if it fails.
-eval chr 0x387;
+eval chr 0x387;   # forces loading of utf8.pm
 is(1,1, '[perl #74022] Parser looping on OtherIDContinue chars');
 
 # More awkward tests for #line. Keep these at the end, as they will screw