lib/ExtUtils/MM_BeOS.pm

   1 package ExtUtils::MM_BeOS;
   2
   3 =head1 NAME
   4
   5 ExtUtils::MM_BeOS - methods to override UN*X behaviour in ExtUtils::MakeMaker
   6
   7 =head1 SYNOPSIS
   8
   9  use ExtUtils::MM_BeOS; # Done internally by ExtUtils::MakeMaker if needed
  10
  11 =head1 DESCRIPTION
  12
  13 See ExtUtils::MM_Unix for a documentation of the methods provided
  14 there. This package overrides the implementation of these methods, not
  15 the semantics.
  16
  17 =over 4
  18
  19 =cut
  20
  21 use ExtUtils::MakeMaker::Config;
  22 use File::Spec;
  23 require ExtUtils::MM_Any;
  24 require ExtUtils::MM_Unix;
  25
  26 use vars qw(@ISA $VERSION);
  27 @ISA = qw( ExtUtils::MM_Any ExtUtils::MM_Unix );
  28 $VERSION = '1.05';
  29
  30
  31 =item os_flavor
  32
  33 BeOS is BeOS.
  34
  35 =cut
  36
  37 sub os_flavor {
  38     return('BeOS');
  39 }
  40
  41 =item init_linker
  42
  43 libperl.a equivalent to be linked to dynamic extensions.
  44
  45 =cut
  46
  47 sub init_linker {
  48     my($self) = shift;
  49
  50     $self->{PERL_ARCHIVE} ||=
  51       File::Spec->catdir('$(PERL_INC)',$Config{libperl});
  52     $self->{PERL_ARCHIVE_AFTER} ||= '';
  53     $self->{EXPORT_LIST}  ||= '';
  54 }
  55
  56 =back
  57
  58 1;
  59 __END__
  60