This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
ParseXS - better support for duplicate ALIASes
[perl5.git] / dist / ExtUtils-ParseXS / t / XSFalsePositive2.xs
CommitLineData
364f7025
JK
1MODULE = My PACKAGE = My
2
3#ifdef MYDEF123
4
5void
6do(xdbh)
7 SV *xdbh
8CODE:
9{
10 int x;
11 ++x;
12}
13
14#endif
15
16void
17do(dbh)
18 SV *dbh
19CODE:
20{
21 int x;
22 ++x;
23}