xref: /openbsd-src/gnu/usr.bin/perl/ext/XS-APItest/t/stuff_modify_bug.t (revision 898184e3e61f9129feb5978fad5a8c6865f00b92)
1*898184e3Ssthenuse warnings;
2*898184e3Ssthenuse strict;
3*898184e3Ssthen
4*898184e3Ssthenuse Test::More tests => 1;
5*898184e3Ssthen
6*898184e3Ssthenuse XS::APItest qw(stufftest);
7*898184e3Ssthen
8*898184e3Ssthenmy $a = "stufftest+;();";
9*898184e3Sstheneval $a;
10*898184e3Ssthenis $a, "stufftest+;();";
11*898184e3Ssthen
12*898184e3Ssthen1;
13