r62608 - in /branches/upstream/libmodule-install-xsutil-perl/current: Changes META.yml example/MyMakefile.PL lib/Module/Install/XSUtil.pm
angelabad-guest at users.alioth.debian.org
angelabad-guest at users.alioth.debian.org
Wed Sep 15 17:54:02 UTC 2010
Author: angelabad-guest
Date: Wed Sep 15 17:53:24 2010
New Revision: 62608
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=62608
Log:
[svn-upgrade] new version libmodule-install-xsutil-perl (0.32)
Modified:
branches/upstream/libmodule-install-xsutil-perl/current/Changes
branches/upstream/libmodule-install-xsutil-perl/current/META.yml
branches/upstream/libmodule-install-xsutil-perl/current/example/MyMakefile.PL
branches/upstream/libmodule-install-xsutil-perl/current/lib/Module/Install/XSUtil.pm
Modified: branches/upstream/libmodule-install-xsutil-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmodule-install-xsutil-perl/current/Changes?rev=62608&op=diff
==============================================================================
--- branches/upstream/libmodule-install-xsutil-perl/current/Changes (original)
+++ branches/upstream/libmodule-install-xsutil-perl/current/Changes Wed Sep 15 17:53:24 2010
@@ -1,4 +1,11 @@
Revision history for Perl extension Module::Install::XSUtil
+
+0.32 Mon Sep 13 14:18:33 2010
+ - Don't clean xshelper.h by default.
+ Use use_xshelper -clean (or -realclean) to clean the file.
+
+0.31 Mon Sep 13 13:09:16 2010
+ - Fix a check for STATIC_INLINE (s/__cplusplus__/__cplusplus/)
0.30 Sat Sep 11 14:17:06 2010
- Add use_xshelper() command to create xshelper.h
Modified: branches/upstream/libmodule-install-xsutil-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmodule-install-xsutil-perl/current/META.yml?rev=62608&op=diff
==============================================================================
--- branches/upstream/libmodule-install-xsutil-perl/current/META.yml (original)
+++ branches/upstream/libmodule-install-xsutil-perl/current/META.yml Wed Sep 15 17:53:24 2010
@@ -31,4 +31,4 @@
resources:
license: http://dev.perl.org/licenses/
repository: git://github.com/gfx/Perl-Module-Install-XSUtil.git
-version: 0.30
+version: 0.32
Modified: branches/upstream/libmodule-install-xsutil-perl/current/example/MyMakefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmodule-install-xsutil-perl/current/example/MyMakefile.PL?rev=62608&op=diff
==============================================================================
--- branches/upstream/libmodule-install-xsutil-perl/current/example/MyMakefile.PL (original)
+++ branches/upstream/libmodule-install-xsutil-perl/current/example/MyMakefile.PL Wed Sep 15 17:53:24 2010
@@ -18,7 +18,7 @@
requires_xs 'B::Hooks::OP::Annotation'; # for testing only
use_ppport 3.19;
-use_xshelper;
+use_xshelper -clean;
cc_warnings;
Modified: branches/upstream/libmodule-install-xsutil-perl/current/lib/Module/Install/XSUtil.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmodule-install-xsutil-perl/current/lib/Module/Install/XSUtil.pm?rev=62608&op=diff
==============================================================================
--- branches/upstream/libmodule-install-xsutil-perl/current/lib/Module/Install/XSUtil.pm (original)
+++ branches/upstream/libmodule-install-xsutil-perl/current/lib/Module/Install/XSUtil.pm Wed Sep 15 17:53:24 2010
@@ -2,7 +2,7 @@
use 5.005_03;
-$VERSION = '0.30';
+$VERSION = '0.32';
use Module::Install::Base;
@ISA = qw(Module::Install::Base);
@@ -143,7 +143,7 @@
}
sub use_xshelper {
- my($self) = @_;
+ my($self, $opt) = @_;
$self->_xs_initialize();
$self->use_ppport();
@@ -151,8 +151,14 @@
open my $fh, '>', $file or die "Cannot open $file for writing: $!";
print $fh $self->_xshelper_h();
close $fh or die "Cannot close $file: $!";
-
- $self->clean_files($file);
+ if(defined $opt) {
+ if($opt eq '-clean') {
+ $self->clean_files($file);
+ }
+ else {
+ $self->realclean_files($file);
+ }
+ }
return;
}
@@ -611,15 +617,16 @@
sub _xshelper_h {
my $h = <<'XSHELPER_H';
+:/* THIS FILE IS AUTOMATICALLY GENERATED BY Module::Install::XSUtil $VERSION. */
:/*
:=head1 NAME
:
-:perlxs.h - Helper C header file for XS modules
+:xshelper.h - Helper C header file for XS modules
:
:=head1 DESCRIPTION
:
: // This includes all the perl header files and ppport.h
-: #include "perlxs.h"
+: #include "xshelper.h"
:
:=head1 SEE ALSO
:
@@ -627,7 +634,7 @@
:
:=head1 AUTHOR
:
-:Fuji, Goro (gfx)
+:Fuji, Goro (gfx) E<lt>gfuji at cpan.orgE<gt>
:
:=head1 LISENCE
:
@@ -659,11 +666,11 @@
:/* portability stuff not supported by ppport.h yet */
:
:#ifndef STATIC_INLINE /* from 5.13.4 */
-:# if defined(__GNUC__) || defined(__cplusplus__) || (defined(__STDC_VERSION__) && (__STDC_VERSION__ >= 199901L))
-:# define STATIC_INLINE static inline
-:# else
-:# define STATIC_INLINE static
-:# endif
+:# if defined(__GNUC__) || defined(__cplusplus) || (defined(__STDC_VERSION__) && (__STDC_VERSION__ >= 199901L))
+:# define STATIC_INLINE static inline
+:# else
+:# define STATIC_INLINE static
+:# endif
:#endif /* STATIC_INLINE */
:
:#ifndef __attribute__format__
@@ -712,6 +719,7 @@
: } STMT_END
XSHELPER_H
$h =~ s/^://xmsg;
+ $h =~ s/\$VERSION\b/$Module::Install::XSUtil::VERSION/xms;
return $h;
}
@@ -757,7 +765,7 @@
=head1 VERSION
-This document describes Module::Install::XSUtil version 0.30.
+This document describes Module::Install::XSUtil version 0.32.
=head1 SYNOPSIS
@@ -833,12 +841,15 @@
This command calls C<< configure_requires 'Devel::PPPort' => $version >>
and adds C<-DUSE_PPPORT> to C<MakeMaker>'s C<DEFINE>.
-=head2 use_xshelper
+=head2 use_xshelper ?-clean|-realclean
Create sF<xshelper.h>, which is a helper header file to include
F<EXTERN.h>, F<perl.h>, F<XSUB.h> and F<ppport.h>, and defines
some portability stuff which are not supported by F<ppport.h>.
+Optional argument C<-clean> and C<-realclean> set C<clean_files>
+or C<realclean_files> to the generated file F<xshelper.h> respectably.
+
This command includes C<use_ppport>.
=head2 cc_warnings
@@ -950,7 +961,7 @@
=head1 LICENSE AND COPYRIGHT
-Copyright (c) 2009-2010, Goro Fuji (gfx). Some rights reserved.
+Copyright (c) 2009-2010, Goro Fuji (gfx). All rights reserved.
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself.
More information about the Pkg-perl-cvs-commits
mailing list