BEGIN {
chdir 't' if -d 't';
- @INC = ('.');
+ unshift @INC, ('.', '../lib');
}
# don't make this lexical
# compile-time failure in require
do_require "1)\n";
-print "# $@\nnot " unless $@ =~ /syntax error/i;
+# bison says 'parse error' instead of 'syntax error',
+# various yaccs may or may not capitalize 'syntax'.
+print "# $@\nnot " unless $@ =~ /(syntax|parse) error/mi;
print "ok ",$i++,"\n";
# successful require
print "# $@\nnot " if $@;
print "ok ",$i++,"\n";
-END { unlink 'bleah.pm'; }
+END { 1 while unlink 'bleah.pm'; }
# ***interaction with pod (don't put any thing after here)***