xref: /openbsd-src/gnu/usr.bin/perl/ext/XS-APItest/t/stuff_modify_bug.t (revision 898184e3e61f9129feb5978fad5a8c6865f00b92)

use warnings;
use strict;

use Test::More tests => 1;

use XS::APItest qw(stufftest);

my $a = "stufftest+;();";
eval $a;
is $a, "stufftest+;();";

1;