]> git.vpit.fr Git - perl/modules/indirect.git/blob - t/45-memory.t
Preserve previous compilation errors on fatal indirect constructs
[perl/modules/indirect.git] / t / 45-memory.t
1 #!perl -T
2
3 use lib 't/lib';
4
5 use Test::More tests => 1;
6
7 BEGIN { delete $ENV{PERL_INDIRECT_PM_DISABLE} }
8
9 eval "require indirect::Test0::Oooooo::Pppppppp";
10 is($@, '', 'memory reallocation to an uncatched optype');