Commit | Line | Data |
---|---|---|
7292dc67 RGS |
1 | package ExtUtils::MM_QNX; |
2 | ||
3 | use strict; | |
d67fe576 | 4 | our $VERSION = '6.74'; |
7292dc67 RGS |
5 | |
6 | require ExtUtils::MM_Unix; | |
a592ba15 | 7 | our @ISA = qw(ExtUtils::MM_Unix); |
7292dc67 RGS |
8 | |
9 | ||
10 | =head1 NAME | |
11 | ||
12 | ExtUtils::MM_QNX - QNX specific subclass of ExtUtils::MM_Unix | |
13 | ||
14 | =head1 SYNOPSIS | |
15 | ||
16 | Don't use this module directly. | |
17 | Use ExtUtils::MM and let it choose. | |
18 | ||
19 | =head1 DESCRIPTION | |
20 | ||
21 | This is a subclass of ExtUtils::MM_Unix which contains functionality for | |
22 | QNX. | |
23 | ||
24 | Unless otherwise stated it works just like ExtUtils::MM_Unix | |
25 | ||
26 | =head2 Overridden methods | |
27 | ||
28 | =head3 extra_clean_files | |
29 | ||
30 | Add .err files corresponding to each .c file. | |
31 | ||
32 | =cut | |
33 | ||
34 | sub extra_clean_files { | |
35 | my $self = shift; | |
36 | ||
37 | my @errfiles = @{$self->{C}}; | |
38 | for ( @errfiles ) { | |
39 | s/.c$/.err/; | |
40 | } | |
41 | ||
42 | return( @errfiles, 'perlmain.err' ); | |
43 | } | |
44 | ||
45 | ||
46 | =head1 AUTHOR | |
47 | ||
48 | Michael G Schwern <schwern@pobox.com> with code from ExtUtils::MM_Unix | |
49 | ||
50 | =head1 SEE ALSO | |
51 | ||
52 | L<ExtUtils::MakeMaker> | |
53 | ||
54 | =cut | |
55 | ||
56 | ||
57 | 1; |