r62610 - in /trunk/libmodule-install-xsutil-perl: Changes META.yml debian/changelog 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 18:02:29 UTC 2010


Author: angelabad-guest
Date: Wed Sep 15 18:01:50 2010
New Revision: 62610

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=62610
Log:
New upstream release

Modified:
    trunk/libmodule-install-xsutil-perl/Changes
    trunk/libmodule-install-xsutil-perl/META.yml
    trunk/libmodule-install-xsutil-perl/debian/changelog
    trunk/libmodule-install-xsutil-perl/example/MyMakefile.PL
    trunk/libmodule-install-xsutil-perl/lib/Module/Install/XSUtil.pm

Modified: trunk/libmodule-install-xsutil-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmodule-install-xsutil-perl/Changes?rev=62610&op=diff
==============================================================================
--- trunk/libmodule-install-xsutil-perl/Changes (original)
+++ trunk/libmodule-install-xsutil-perl/Changes Wed Sep 15 18:01:50 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: trunk/libmodule-install-xsutil-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmodule-install-xsutil-perl/META.yml?rev=62610&op=diff
==============================================================================
--- trunk/libmodule-install-xsutil-perl/META.yml (original)
+++ trunk/libmodule-install-xsutil-perl/META.yml Wed Sep 15 18:01:50 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: trunk/libmodule-install-xsutil-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmodule-install-xsutil-perl/debian/changelog?rev=62610&op=diff
==============================================================================
--- trunk/libmodule-install-xsutil-perl/debian/changelog (original)
+++ trunk/libmodule-install-xsutil-perl/debian/changelog Wed Sep 15 18:01:50 2010
@@ -1,3 +1,9 @@
+libmodule-install-xsutil-perl (0.32-1) unstable; urgency=low
+
+  * New upstream release
+
+ -- Angel Abad <angelabad at gmail.com>  Wed, 15 Sep 2010 20:01:02 +0200
+
 libmodule-install-xsutil-perl (0.30-1) unstable; urgency=low
 
   * New upstream release

Modified: trunk/libmodule-install-xsutil-perl/example/MyMakefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmodule-install-xsutil-perl/example/MyMakefile.PL?rev=62610&op=diff
==============================================================================
--- trunk/libmodule-install-xsutil-perl/example/MyMakefile.PL (original)
+++ trunk/libmodule-install-xsutil-perl/example/MyMakefile.PL Wed Sep 15 18:01:50 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: trunk/libmodule-install-xsutil-perl/lib/Module/Install/XSUtil.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmodule-install-xsutil-perl/lib/Module/Install/XSUtil.pm?rev=62610&op=diff
==============================================================================
--- trunk/libmodule-install-xsutil-perl/lib/Module/Install/XSUtil.pm (original)
+++ trunk/libmodule-install-xsutil-perl/lib/Module/Install/XSUtil.pm Wed Sep 15 18:01:50 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