home *** CD-ROM | disk | FTP | other *** search
/ PC World 2005 June / PCWorld_2005-06_cd.bin / software / vyzkuste / firewally / firewally.exe / framework-2.3.exe / MM_BeOS.pm < prev    next >
Text File  |  2003-11-07  |  971b  |  61 lines
  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 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.04;
  29.  
  30.  
  31. =item os_flavor (o)
  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.  
  61.