[p5sagit/p5-mst-13.2.git] / lib / ExtUtils / MM_BeOS.pm

package ExtUtils::MM_BeOS;

our $VERSION = '1.00';

=head1 NAME

ExtUtils::MM_BeOS - methods to override UN*X behaviour in ExtUtils::MakeMaker

=head1 SYNOPSIS

 use ExtUtils::MM_BeOS;	# Done internally by ExtUtils::MakeMaker if needed

=head1 DESCRIPTION

See ExtUtils::MM_Unix for a documentation of the methods provided
there. This package overrides the implementation of these methods, not
the semantics.

=over 4

=cut 

use Config;
use File::Spec;
require Exporter;

require ExtUtils::MakeMaker;
ExtUtils::MakeMaker->import(qw( $Verbose &neatvalue));

unshift @MM::ISA, 'ExtUtils::MM_BeOS';

=item perl_archive

This is internal method that returns path to libperl.a equivalent
to be linked to dynamic extensions. UNIX does not have one, but at
least BeOS has one.

=cut

sub perl_archive
  {
  return File::Spec->catdir('$(PERL_INC)',$Config{libperl});
  }

1;
__END__
Commit	Line	Data
e9eafa28	1	package ExtUtils::MM_BeOS;
	2
	3	our $VERSION = '1.00';
	4
	5	=head1 NAME
	6
	7	ExtUtils::MM_BeOS - methods to override UN*X behaviour in ExtUtils::MakeMaker
	8
	9	=head1 SYNOPSIS
	10
	11	use ExtUtils::MM_BeOS; # Done internally by ExtUtils::MakeMaker if needed
	12
	13	=head1 DESCRIPTION
	14
	15	See ExtUtils::MM_Unix for a documentation of the methods provided
	16	there. This package overrides the implementation of these methods, not
	17	the semantics.
	18
	19	=over 4
	20
	21	=cut
	22
	23	use Config;
	24	use File::Spec;
	25	require Exporter;
	26
	27	require ExtUtils::MakeMaker;
	28	ExtUtils::MakeMaker->import(qw( $Verbose &neatvalue));
	29
	30	unshift @MM::ISA, 'ExtUtils::MM_BeOS';
	31
	32	=item perl_archive
	33
	34	This is internal method that returns path to libperl.a equivalent
	35	to be linked to dynamic extensions. UNIX does not have one, but at
	36	least BeOS has one.
	37
	38	=cut
	39
	40	sub perl_archive
	41	{
d108ee1c	42	return File::Spec->catdir('$(PERL_INC)',$Config{libperl});
e9eafa28	43	}
	44
	45	1;
	46	__END__
	47