ext/XS-APItest/t/stuff_svcur_bug.t

   1 use warnings;
   2 use strict;
   3
   4 use Test::More tests => 1;
   5 ok 1;
   6
   7 use XS::APItest qw(stufftest);
   8
   9 # In the buggy case, a syntax error occurs at EOF.
  10 # Adding a semicolon, any following statements, or anything else
  11 # causes the bug not to show itself.
  12 stufftest+;()