t/lib/MakeMaker/Test/NoXS.pm

   1 package MakeMaker::Test::NoXS;
   2
   3 # Disable all XS loading.
   4
   5 use Carp;
   6
   7 require DynaLoader;
   8 require XSLoader;
   9
  10 no warnings 'redefine';
  11 *DynaLoader::bootstrap = sub { confess "Tried to load XS for @_"; };
  12 *XSLoader::load        = sub { confess "Tried to load XS for @_"; };
  13
  14 1;