[p5sagit/Function-Parameters.git] / t / foreign / Method-Signatures / error_interruption.t

#!perl
use strict;
use warnings FATAL => 'all';

use Dir::Self;
use lib __DIR__ . "/lib";

use Test::More;
use Test::Fatal;

like exception { require BarfyDie },
  qr/requires explicit package name/,
  "F:P doesn't interrupt real compilation error";

done_testing();
Commit	Line	Data
633048d5	1	#!perl
	2	use strict;
	3	use warnings FATAL => 'all';
	4
	5	use Dir::Self;
	6	use lib __DIR__ . "/lib";
	7
	8	use Test::More;
	9	use Test::Fatal;
	10
	11	like exception { require BarfyDie },
	12	qr/requires explicit package name/,
	13	"F:P doesn't interrupt real compilation error";
	14
	15	done_testing();