1*f2a19305Safresh1# for use by caller.t for GH #15109 2*f2a19305Safresh1 3*f2a19305Safresh1package Foo; 4*f2a19305Safresh1 5*f2a19305Safresh1sub import { 6*f2a19305Safresh1 use warnings; # restore default warnings 7*f2a19305Safresh1 () = caller(1); # this used to cause valgrind errors 8*f2a19305Safresh1} 9*f2a19305Safresh11; 10