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