Commit | Line | Data |
6b09c160 |
1 | package ExtUtils::CBuilder::Platform::VMS; |
2 | |
3 | use strict; |
4 | use ExtUtils::CBuilder::Base; |
5 | |
6 | use vars qw($VERSION @ISA); |
345dbb93 |
7 | $VERSION = '0.12'; |
6b09c160 |
8 | @ISA = qw(ExtUtils::CBuilder::Base); |
9 | |
10 | sub need_prelink { 0 } |
11 | |
12 | sub arg_include_dirs { |
13 | my $self = shift; |
14 | return '/include=(' . join(',', @_) . ')'; |
15 | } |
16 | |
17 | sub arg_nolink { return; } |
18 | |
19 | sub arg_object_file { |
20 | my ($self, $file) = @_; |
21 | return "/obj=$file"; |
22 | } |
23 | |
24 | sub arg_exec_file { |
25 | my ($self, $file) = @_; |
26 | return ("/exe=$file"); |
27 | } |
28 | |
29 | sub arg_share_object_file { |
30 | my ($self, $file) = @_; |
31 | return ("$self->{config}{lddlflags}=$file"); |
32 | } |
33 | |
34 | 1; |