r69306 - in /trunk/libinline-perl: ./ C/ C/lib/Inline/C/ C/t/ debian/
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Tue Feb 22 04:06:43 UTC 2011
Author: jawnsy-guest
Date: Tue Feb 22 04:03:31 2011
New Revision: 69306
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=69306
Log:
No functional changes in this version
IGNORE-VERSION: 0.48-1
* New upstream release
* Refresh copyright information
Added:
trunk/libinline-perl/C/t/08taint_1.p
- copied unchanged from r69305, branches/upstream/libinline-perl/current/C/t/08taint_1.p
trunk/libinline-perl/C/t/08taint_2.p
- copied unchanged from r69305, branches/upstream/libinline-perl/current/C/t/08taint_2.p
trunk/libinline-perl/C/t/08taint_3.p
- copied unchanged from r69305, branches/upstream/libinline-perl/current/C/t/08taint_3.p
trunk/libinline-perl/C/t/12taint_old.t
- copied unchanged from r69305, branches/upstream/libinline-perl/current/C/t/12taint_old.t
Modified:
trunk/libinline-perl/C/C-Cookbook.pod
trunk/libinline-perl/C/C.pm
trunk/libinline-perl/C/C.pod
trunk/libinline-perl/C/Changes
trunk/libinline-perl/C/Makefile.PL
trunk/libinline-perl/C/README
trunk/libinline-perl/C/lib/Inline/C/ParseRecDescent.pm
trunk/libinline-perl/C/lib/Inline/C/ParseRegExp.pm
trunk/libinline-perl/C/t/08taint.t
trunk/libinline-perl/Changes
trunk/libinline-perl/Inline-API.pod
trunk/libinline-perl/Inline-Support.pod
trunk/libinline-perl/Inline.pm
trunk/libinline-perl/Inline.pod
trunk/libinline-perl/MANIFEST
trunk/libinline-perl/Makefile.PL
trunk/libinline-perl/README
trunk/libinline-perl/debian/changelog
trunk/libinline-perl/debian/control
trunk/libinline-perl/debian/copyright
Modified: trunk/libinline-perl/C/C-Cookbook.pod
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/C/C-Cookbook.pod?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/C/C-Cookbook.pod (original)
+++ trunk/libinline-perl/C/C-Cookbook.pod Tue Feb 22 04:03:31 2011
@@ -1426,7 +1426,9 @@
=head1 COPYRIGHT
-Copyright (c) 2001, 2002, Brian Ingerson.
+Copyright (c) 2001, 2002. Brian Ingerson.
+
+Copyright (c) 2008, 2010, 2011. Sisyphus.
All Rights Reserved. This module is free software. It may be
used, redistributed and/or modified under the terms of the Perl
Modified: trunk/libinline-perl/C/C.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/C/C.pm?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/C/C.pm (original)
+++ trunk/libinline-perl/C/C.pm Tue Feb 22 04:03:31 2011
@@ -1,5 +1,5 @@
package Inline::C;
-$VERSION = '0.47';
+$VERSION = '0.48';
use strict;
require Inline;
Modified: trunk/libinline-perl/C/C.pod
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/C/C.pod?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/C/C.pod (original)
+++ trunk/libinline-perl/C/C.pod Tue Feb 22 04:03:31 2011
@@ -503,7 +503,9 @@
=head1 COPYRIGHT
-Copyright (c) 2000, 2001, 2002. Brian Ingerson. All rights reserved.
+Copyright (c) 2000-2002. Brian Ingerson.
+
+Copyright (c) 2008, 2010, 2011. Sisyphus.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
Modified: trunk/libinline-perl/C/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/C/Changes?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/C/Changes (original)
+++ trunk/libinline-perl/C/Changes Tue Feb 22 04:03:31 2011
@@ -1,4 +1,17 @@
Revision history for Perl extension Inline::C.
+
+0.48 Mon 21 Feb 2011
+ Version 0.48 released to CPAN. (No changes from 0.47_02.)
+
+0.47_02 Tues 1 Feb 2011
+ Version 0.47_02 released to CPAN.
+ - Change the Test::Warn dependency from 0.22 to 0.21 and
+ specify it in top-level Makefile.PL instead of in C/Makefile.PL.
+
+0.47_01 Sun 30 January 2011
+ Version 0.47_01 released to CPAN.
+ - Use Test::Warn (on perl-5.8 and later) to check and suppress the
+ warnings produced by C/t/08taint.t during 'make test'. (Ticket #54825.)
0.47 Fri 21 January 2011
Version 0.47 released to CPAN. No changes from 0.46_02
Modified: trunk/libinline-perl/C/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/C/Makefile.PL?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/C/Makefile.PL (original)
+++ trunk/libinline-perl/C/Makefile.PL Tue Feb 22 04:03:31 2011
@@ -1,107 +1,105 @@
-use strict;
-use ExtUtils::MakeMaker;
-use Config;
-use File::Spec;
-
-my ($cc, $exe) = @Config{'cc', '_exe'};
-$cc =~ s/\s+-.+$//; #remove possible trailing options
-
-my $found = 0;
-my $delim = $Config::Config{path_sep};
-
-if ($cc =~ m|/:\[|) {
- my $comp = (split /\./, $cc)[0];
- $found = -f "$comp$exe";
-}
-
-# $Config{cc} might be something like 'ccache cc'
-elsif ($cc =~ m|ccache|) {
- my @cc = split /\s+/, $cc;
- $found = 1;
- for (@cc) {
- if (!find_executable($_)) {
- $found = 0;
- last;
- }
- }
-}
-
-else {
- $found = find_executable($cc);
-}
-
-print <<END;
-
-Inline::C is packaged with Inline.pm because it is the most commonly used
-Inline Language Support Module (ILSM).
-
-See also: Inline::ASM, ::Awk, ::BC, ::Basic, ::Befunge, ::CPP (C++), ::CPR,
- ::Foo, ::Guile, ::Java, ::Octave, ::PERL, ::Python, ::Ruby, ::TT,
- ::Tcl and ::WebChat.
-
-Config.pm indicates that your version of Perl was built with this C compiler:
-
- $cc
-
-END
-
-if ($found) {
- print <<END;
-I have located this compiler on your system.
-
-END
-}
-else {
- print <<END;
-I cannot locate this compiler on your system.
-
-You can install Inline.pm without installing Inline::C. But you'll
-need to install another Inline language module (like Inline::Java for
-instance) to actually make use of it.
-
-If the aforementioned C compiler really is on your system, please make sure
-it can be found in the PATH and then try running this program again. Or if
-you think I made an error searching for this compiler, simply answer 'Y' to
-the next question.
-
-END
-# '
-}
-
-my $answer = '';
-my $default = $found ? "y" : "n";
-while (1) {
- $answer = prompt ('Do you want to install Inline::C?', $default);
- last if $answer =~ /^(y|yes|n|no)$/i;
-}
-
-if ($answer =~ /^(y|yes)$/i) {
- WriteMakefile(
- NAME => 'Inline::C',
- clean => {FILES => '_Inline_test'},
- )
-}
-else {
- open MF, "> Makefile" or die "Can't open Makefile for output";
- print MF <<'END';
-all::
-test::
-clean::
-END
- close MF;
-}
-
-sub find_executable {
- return 1 if -e $_[0];
- my($cc) = @_;
- my $comp = (split /\./, $cc)[0];
-
- # $Config{cc} might be something like '/some/place/cc'
- if ($cc =~ m|/|) {
- return -f "$comp$exe" || -l $cc;
- }
-
- for my $lib (split $delim, $ENV{PATH}) {
- return 1 if -f File::Spec->catfile($lib,"$comp$exe");
- }
-}
+use strict;
+use ExtUtils::MakeMaker;
+use Config;
+use File::Spec;
+
+my ($cc, $exe) = @Config{'cc', '_exe'};
+$cc =~ s/\s+-.+$//; #remove possible trailing options
+
+my $found = 0;
+my $delim = $Config::Config{path_sep};
+
+if ($cc =~ m|/:\[|) {
+ my $comp = (split /\./, $cc)[0];
+ $found = -f "$comp$exe";
+}
+
+# $Config{cc} might be something like 'ccache cc'
+elsif ($cc =~ m|ccache|) {
+ my @cc = split /\s+/, $cc;
+ $found = 1;
+ for (@cc) {
+ if (!find_executable($_)) {
+ $found = 0;
+ last;
+ }
+ }
+}
+
+else {
+ $found = find_executable($cc);
+}
+
+print <<END;
+
+Inline::C is packaged with Inline.pm because it is the most commonly used
+Inline Language Support Module (ILSM).
+
+See also: Inline::ASM, ::Awk, ::BC, ::Basic, ::Befunge, ::CPP (C++), ::CPR,
+ ::Foo, ::Guile, ::Java, ::Octave, ::PERL, ::Python, ::Ruby, ::TT,
+ ::Tcl and ::WebChat.
+
+Config.pm indicates that your version of Perl was built with this C compiler:
+
+ $cc
+
+END
+
+if ($found) {
+ print <<END;
+I have located this compiler on your system.
+
+END
+}
+else {
+ print <<END;
+I cannot locate this compiler on your system.
+
+You can install Inline.pm without installing Inline::C. But you'll
+need to install another Inline language module (like Inline::Java for
+instance) to actually make use of it.
+
+If the aforementioned C compiler really is on your system, please make sure
+it can be found in the PATH and then try running this program again. Or if
+you think I made an error searching for this compiler, simply answer 'Y' to
+the next question.
+
+END
+# '
+}
+
+my $answer = '';
+my $default = $found ? "y" : "n";
+while (1) {
+ $answer = prompt ('Do you want to install Inline::C?', $default);
+ last if $answer =~ /^(y|yes|n|no)$/i;
+}
+
+if ($answer =~ /^(y|yes)$/i) {
+ my %h = (NAME => 'Inline::C', clean => {FILES => '_Inline_test'});
+ WriteMakefile(%h);
+}
+else {
+ open MF, "> Makefile" or die "Can't open Makefile for output";
+ print MF <<'END';
+all::
+test::
+clean::
+END
+ close MF;
+}
+
+sub find_executable {
+ return 1 if -e $_[0];
+ my($cc) = @_;
+ my $comp = (split /\./, $cc)[0];
+
+ # $Config{cc} might be something like '/some/place/cc'
+ if ($cc =~ m|/|) {
+ return -f "$comp$exe" || -l $cc;
+ }
+
+ for my $lib (split $delim, $ENV{PATH}) {
+ return 1 if -f File::Spec->catfile($lib,"$comp$exe");
+ }
+}
Modified: trunk/libinline-perl/C/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/C/README?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/C/README (original)
+++ trunk/libinline-perl/C/README Tue Feb 22 04:03:31 2011
@@ -11,7 +11,7 @@
return newSVpvf ("Just Another %s Hacker",x);
}
END
-
+
print JAxH('Inline'), "\n";
When run, this complete program prints:
@@ -23,9 +23,9 @@
This module requires the Inline module with which it is distributed. It also
requires the appropriate C compiler. (Where appropriate means the one referred
-to in your Config.pm)
+to in your Config.pm)
-Inline::C is packaged with Inline.pm. It is not necessary to install Inline::C to use Inline with some other language, like Java.
+Inline::C is packaged with Inline.pm. It is not necessary to install Inline::C to use Inline with some other language, like Java.
-------------------------------------------------------------------------------
INFORMATION:
@@ -37,9 +37,10 @@
= For information about the Perl5 internal C API, see 'perldoc perlapi' or
try http://www.perldoc.com/perl5.6/pod/perlapi.html
-The Inline.pm mailing list is inline at perl.org.
+The Inline.pm mailing list is inline at perl.org.
Send email to inline-subscribe at perl.org to subscribe.
Please send questions and comments to "Brian Ingerson" <INGY at cpan.org>
-Copyright (c) 2001, 2002, Brian Ingerson. All Rights Reserved.
+Copyright (c) 2001, 2002. Brian Ingerson.
+Copyright (c) 2008, 2010, 2011. Sisyphus.
Modified: trunk/libinline-perl/C/lib/Inline/C/ParseRecDescent.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/C/lib/Inline/C/ParseRecDescent.pm?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/C/lib/Inline/C/ParseRecDescent.pm (original)
+++ trunk/libinline-perl/C/lib/Inline/C/ParseRecDescent.pm Tue Feb 22 04:03:31 2011
@@ -169,7 +169,9 @@
=head1 COPYRIGHT
-Copyright (c) 2002. Brian Ingerson. All rights reserved.
+Copyright (c) 2002. Brian Ingerson.
+
+Copyright (c) 2008, 2010, 2011. Sisyphus.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
Modified: trunk/libinline-perl/C/lib/Inline/C/ParseRegExp.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/C/lib/Inline/C/ParseRegExp.pm?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/C/lib/Inline/C/ParseRegExp.pm (original)
+++ trunk/libinline-perl/C/lib/Inline/C/ParseRegExp.pm Tue Feb 22 04:03:31 2011
@@ -170,7 +170,9 @@
=head1 COPYRIGHT
-Copyright (c) 2002. Brian Ingerson. All rights reserved.
+Copyright (c) 2002. Brian Ingerson.
+
+Copyright (c) 2008, 2010, 2011. Sisyphus.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
Modified: trunk/libinline-perl/C/t/08taint.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/C/t/08taint.t?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/C/t/08taint.t (original)
+++ trunk/libinline-perl/C/t/08taint.t Tue Feb 22 04:03:31 2011
@@ -1,71 +1,39 @@
#!perl -T
-use File::Spec;
-use lib (File::Spec->catdir(File::Spec->updir(),'blib','lib'), File::Spec->catdir(File::Spec->curdir(),'blib','lib'));
-use strict;
-use Test;
-use diagnostics;
-use Inline Config =>
- UNTAINT => 1,
- DIRECTORY => '_Inline_test';
BEGIN {
- plan(tests => 5,
- todo => [],
- onfail => sub {},
- );
- warn "Expect a number of \"Blindly untainting ...\" warnings - these are intended.\n";
-}
-use Inline Config =>
- UNTAINT => 1,
- DIRECTORY => '_Inline_test';
+ if($] < 5.007) {
+ print "1..1\n";
+ warn "Skipped for perl 5.6.x\n";
+ print "ok 1\n";
+ exit(0);
+ }
+};
+use warnings;
+use strict;
+use Test::More tests => 10;
-# test 1 - Check string syntax
-ok(add(3, 7) == 10);
-# test 2 - Check string syntax again
-ok(subtract(3, 7) == -4);
-# test 3 - Check DATA syntax
-ok(multiply(3, 7) == 21);
-# test 4 - Check DATA syntax again
-ok(divide(7, -3) == -2);
+use Test::Warn;
-use Inline 'C';
-use Inline C => 'DATA';
-use Inline C => <<'END_OF_C_CODE';
+# Suppress "Set up gcc environment ..." warning.
+# (Affects ActivePerl only.)
+$ENV{ACTIVEPERL_CONFIG_SILENT} = 1;
-int add(int x, int y) {
- return x + y;
+my $w1 = 'Blindly untainting tainted fields in %ENV';
+my $w2 = 'Blindly untainting Inline configuration file information';
+my $w3 = 'Blindly untainting tainted fields in Inline object';
+
+warnings_like {require_taint_1()} [qr/$w1/, qr/$w2/, qr/$w1/, qr/$w3/], 'warn_test 1';
+warnings_like {require_taint_2()} [qr/$w1/, qr/$w2/, qr/$w1/, qr/$w3/], 'warn_test 2';
+warnings_like {require_taint_3()} [qr/$w1/, qr/$w2/, qr/$w1/, qr/$w3/, qr/$w1/, qr/$w2/, qr/$w1/, qr/$w3/], 'warn_test 3';
+
+sub require_taint_1 {
+ require './t/08taint_1.p';
}
-int subtract(int x, int y) {
- return x - y;
-}
-END_OF_C_CODE
-
-Inline->bind(C => <<'END');
-
-int incr(int x) {
- return x + 1;
-}
-END
-
-# test 5 - Test Inline->bind() syntax
-ok(incr(incr(7)) == 9);
-
-__END__
-
-# unused code or maybe AutoLoader stuff
-sub crap {
- return 'crap';
+sub require_taint_2 {
+ require './t/08taint_2.p';
}
-__C__
-
-int multiply(int x, int y) {
- return x * y;
+sub require_taint_3 {
+ require './t/08taint_3.p';
}
-
-__C__
-
-int divide(int x, int y) {
- return x / y;
-}
Modified: trunk/libinline-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/Changes?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/Changes (original)
+++ trunk/libinline-perl/Changes Tue Feb 22 04:03:31 2011
@@ -1,4 +1,22 @@
# Revision history for Perl extension Inline.
+
+---
+version: 0.48
+date: Mon 21 Feb 2011
+ Version 0.48 released to CPAN. (No changes from 0.47_02.)
+
+---
+version: 0.47_02
+date: Tues 1 Feb 2011
+ Version 0.47_02 released to CPAN.
+Makefile.PL - Change the Test::Warn dependency from 0.22 to 0.21 and
+ specify it in top-level Makefile.PL instead of in C/Makefile.PL.
+
+---
+version: 0.47_01
+date: Sun 30 January 2011
+ Version 0.47_01 released to CPAN.
+ Changes only to Inline::C test suite - see C/Changes.
---
version: 0.47
Modified: trunk/libinline-perl/Inline-API.pod
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/Inline-API.pod?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/Inline-API.pod (original)
+++ trunk/libinline-perl/Inline-API.pod Tue Feb 22 04:03:31 2011
@@ -5,11 +5,11 @@
=head1 SYNOPSIS
#!/usr/bin/perl
-
+
use Inline Foo;
say_it('foo'); # Use Foo to print "Hello, Foo"
-
- __Foo__
+
+ __Foo__
foo-sub say_it {
foo-my $foo = foo-shift;
foo-print "Hello, $foo\n";
@@ -58,7 +58,7 @@
@Inline::Foo::ISA = qw(Inline);
require Inline;
use Carp;
-
+
#===========================================================
# Register Foo as an Inline Language Support Module (ILSM)
#===========================================================
@@ -70,19 +70,19 @@
suffix => 'foo',
};
}
-
+
#===========================================================
# Error messages
#===========================================================
- sub usage_config {
+ sub usage_config {
my ($key) = @_;
"'$key' is not a valid config option for Inline::Foo\n";
}
-
- sub usage_config_bar {
+
+ sub usage_config_bar {
"Invalid value for Inline::Foo config option BAR";
}
-
+
#===========================================================
# Validate the Foo Config Options
#===========================================================
@@ -105,7 +105,7 @@
croak usage_config($key);
}
}
-
+
#===========================================================
# Parse and compile Foo code
#===========================================================
@@ -129,7 +129,7 @@
print FOO_OBJ $code;
close \*FOO_OBJ;
}
-
+
#===========================================================
# Only needed for interpreted languages
#===========================================================
@@ -143,7 +143,7 @@
eval "package $o->{API}{pkg};\n$code";
croak "Unable to load Foo module $obj:\n$@" if $@;
}
-
+
#===========================================================
# Return a small report about the Foo code.
#===========================================================
@@ -157,7 +157,7 @@
END
return $text;
}
-
+
1;
Except for C<load()>, the subroutines in this code are mandatory for an
@@ -208,7 +208,7 @@
subroutines which you need to supply. We'll call these subroutines
"callbacks".
-You will need to provide the following 5 callback subroutines.
+You will need to provide the following 5 callback subroutines.
=head2 The register() Callback
@@ -406,7 +406,9 @@
=head1 COPYRIGHT
-Copyright (c) 2000, 2001, 2002. Brian Ingerson. All rights reserved.
+Copyright (c) 2000-2002. Brian Ingerson.
+
+Copyright (c) 2008, 2010, 2011. Sisyphus.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
Modified: trunk/libinline-perl/Inline-Support.pod
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/Inline-Support.pod?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/Inline-Support.pod (original)
+++ trunk/libinline-perl/Inline-Support.pod Tue Feb 22 04:03:31 2011
@@ -122,7 +122,9 @@
=head1 COPYRIGHT
-Copyright (c) 2000, 2001, 2002. Brian Ingerson. All rights reserved.
+Copyright (c) 2000-2002. Brian Ingerson.
+
+Copyright (c) 2008, 2010, 2011. Sisyphus.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
Modified: trunk/libinline-perl/Inline.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/Inline.pm?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/Inline.pm (original)
+++ trunk/libinline-perl/Inline.pm Tue Feb 22 04:03:31 2011
@@ -2,7 +2,7 @@
use strict;
require 5.006;
-$Inline::VERSION = '0.47';
+$Inline::VERSION = '0.48';
use AutoLoader 'AUTOLOAD';
use Inline::denter;
@@ -1024,7 +1024,7 @@
#==============================================================================
sub env_untaint {
my $o = shift;
- warn "In Inline::env_untaint() : Blindly untainting tainted fields in %ENV.\n" unless $o->{CONFIG}{NO_UNTAINT_WARN};
+ warn "In Inline::env_untaint() : Blindly untainting tainted fields in %ENV.\n" unless $o->{CONFIG}{NO_UNTAINT_WARN};
{
no warnings ('uninitialized'); # In case $ENV{$_} is set to undef.
Modified: trunk/libinline-perl/Inline.pod
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/Inline.pod?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/Inline.pod (original)
+++ trunk/libinline-perl/Inline.pod Tue Feb 22 04:03:31 2011
@@ -1075,7 +1075,9 @@
=head1 COPYRIGHT
-Copyright (c) 2000, 2001, 2002. Brian Ingerson. All rights reserved.
+Copyright (c) 2000-2002. Brian Ingerson.
+
+Copyright (c) 2008, 2010, 2011. Sisyphus.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
Modified: trunk/libinline-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/MANIFEST?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/MANIFEST (original)
+++ trunk/libinline-perl/MANIFEST Tue Feb 22 04:03:31 2011
@@ -16,9 +16,13 @@
C/t/06parseregexp.t
C/t/07typemap_multi.t
C/t/08taint.t
+C/t/08taint_1.p
+C/t/08taint_2.p
+C/t/08taint_3.p
C/t/09parser.t
C/t/10callback.t
C/t/11default_readonly.t
+C/t/12taint_old.t
C/t/soldier_typemap
C/t/typemap
Changes
Modified: trunk/libinline-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/Makefile.PL?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/Makefile.PL (original)
+++ trunk/libinline-perl/Makefile.PL Tue Feb 22 04:03:31 2011
@@ -1,14 +1,26 @@
use ExtUtils::MakeMaker;
+
+my $prereq_pm = $] > 5.007 ?
+ {
+ Data::Dumper => 2.09,
+ Digest::MD5 => 2.09,
+ Parse::RecDescent => 1.80,
+ File::Spec => 0.8,
+ Test::Warn => 0.21,
+ }
+
+ :
+ {
+ Data::Dumper => 2.09,
+ Digest::MD5 => 2.09,
+ Parse::RecDescent => 1.80,
+ File::Spec => 0.8,
+ };
WriteMakefile(
NAME => 'Inline',
VERSION_FROM => 'Inline.pm',
- PREREQ_PM => {
- Data::Dumper => 2.09,
- Digest::MD5 => 2.09,
- Parse::RecDescent => 1.80,
- File::Spec => 0.8,
- },
+ PREREQ_PM => $prereq_pm,
clean => {FILES => '_Inline_test _Inline .Inline'},
);
Modified: trunk/libinline-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/README?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/README (original)
+++ trunk/libinline-perl/README Tue Feb 22 04:03:31 2011
@@ -2,9 +2,9 @@
Inline.pm - Write Perl subroutines in other programming languages.
-Inline lets you write Perl subroutines in other programming languages
-like C, C++, Java, Python, Tcl and even Assembly. You don't need to
-compile anything. All the details are handled transparently so you
+Inline lets you write Perl subroutines in other programming languages
+like C, C++, Java, Python, Tcl and even Assembly. You don't need to
+compile anything. All the details are handled transparently so you
can just run your Perl script like normal.
Example:
@@ -12,12 +12,12 @@
use Inline::Files;
use Inline C;
print JAxH('Inline'), "\n";
-
+
__C__
SV* JAxH(char* x) {
return newSVpvf ("Just Another %s Hacker",x);
}
-
+
When run, this complete program prints:
Just Another Inline Hacker
@@ -66,7 +66,7 @@
Inline version 0.40 is a major upgrade. It includes:
+ Inline::MakeMaker
+ Rock solid support for writing CPAN extension modules
-+ Short file names.
++ Short file names.
+ No more _Inline/lib/auto/Foo_C_3cee729d1d942c6792ca5a741dc21879/Foo_C_3cee729d1d942c6792ca5a741dc21879.so
+ Now it's _Inline/lib/auto/Foo/Foo.so
+ Support for creating binary distributions.
@@ -111,7 +111,7 @@
Inline version 0.30 is a major upgrade from previous verions. It includes:
+ Integrated support for typemap files in C.
- + All the recognized types now come *only* from typemaps.
+ + All the recognized types now come *only* from typemaps.
+ The default types come from the default typemap installed with core Perl.
+ Typemaps are used to modify the Parse::RecDescent grammar for parsing C.
+ This means you can easily use your existing typemaps.
@@ -119,11 +119,11 @@
+ Beta supoort for C (Inline::C, included)
+ Alpha support for C++ (Inline::CPP, available separately)
+ Alpha support for Python (Inline::Python, available separately)
- + Support for 'embedding' Perl in C with my new programming language, CPR.
+ + Support for 'embedding' Perl in C with my new programming language, CPR.
(Inline::CPR, available separately) This one may warp your mind :^)
+ Simple API for adding your own language support.
+ Write your own Inline::Foo
- + Write your own implementation of Inline::C, or just modify
+ + Write your own implementation of Inline::C, or just modify
Inline::C::grammar.
+ Support for interpreted languages in addition to compiled ones.
+ Autodetection of new Inline language modules.
@@ -148,7 +148,7 @@
= Automatically compiles your source code and caches the shared object.
= Automatically DynaLoads the shared object and binds it to Perl.
-= Recompiles only when the C code changes.
+= Recompiles only when the C code changes.
= Changing the Perl code will not cause a recompile of the C code.
= Support for writing extension modules, suitable for distributing to the CPAN.
= Support for generating and binding Inline subs at run time. <bind()>
@@ -159,7 +159,7 @@
This module requires the Digest::MD5 and Parse::RecDescent modules. It also
requires the appropriate C compiler. (Where appropriate means the one referred
-to in your Config.pm)
+to in your Config.pm)
To install Inline do this:
@@ -185,9 +185,10 @@
try http://www.perldoc.com/perl5.6/pod/perlapi.html
= The Fall 2000 edition of The Perl Journal has an article about Inline
-The Inline.pm mailing list is inline at perl.org. Send email to
+The Inline.pm mailing list is inline at perl.org. Send email to
inline-subscribe at perl.org to subscribe.
Please send questions and comments to "Brian Ingerson" <INGY at cpan.org>
-Copyright (c) 2001, 2002, Brian Ingerson. All Rights Reserved.
+Copyright (c) 2000-2002. Brian Ingerson.
+Copyright (c) 2008, 2010, 2011. Sisyphus.
Modified: trunk/libinline-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/debian/changelog?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/debian/changelog (original)
+++ trunk/libinline-perl/debian/changelog Tue Feb 22 04:03:31 2011
@@ -1,3 +1,13 @@
+libinline-perl (0.48-1) UNRELEASED; urgency=low
+
+ No functional changes in this version
+ IGNORE-VERSION: 0.48-1
+
+ * New upstream release
+ * Refresh copyright information
+
+ -- Jonathan Yu <jawnsy at cpan.org> Mon, 21 Feb 2011 23:06:33 -0500
+
libinline-perl (0.47-1) unstable; urgency=low
* Added myself to Uploaders
Modified: trunk/libinline-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/debian/control?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/debian/control (original)
+++ trunk/libinline-perl/debian/control Tue Feb 22 04:03:31 2011
@@ -2,7 +2,9 @@
Section: perl
Priority: optional
Build-Depends: debhelper (>= 7)
-Build-Depends-Indep: perl, libparse-recdescent-perl
+Build-Depends-Indep: perl,
+ libparse-recdescent-perl,
+ libtest-warn-perl (>= 0.21)
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
Uploaders: gregor herrmann <gregoa at debian.org>, Jonathan Yu <jawnsy at cpan.org>,
Nicholas Bamber <nicholas at periapt.co.uk>
Modified: trunk/libinline-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libinline-perl/debian/copyright?rev=69306&op=diff
==============================================================================
--- trunk/libinline-perl/debian/copyright (original)
+++ trunk/libinline-perl/debian/copyright Tue Feb 22 04:03:31 2011
@@ -1,18 +1,18 @@
Format-Specification: http://svn.debian.org/wsvn/dep/web/deps/dep5.mdwn?op=file&rev=135
-Maintainer: Brian Ingerson <INGY at cpan.org>
+Maintainer: Sisyphus <sisyphus at cpan.org>
Source: http://search.cpan.org/dist/Inline/
Name: Inline
Files: *
-Copyright: 2000-2002, Brian Ingerson <INGY at cpan.org>
+Copyright: 2008-2011, Sisyphus <sisyphus at cpan.org>
+ 2000-2002, Brian Ingerson <ingy at cpan.org>
License: Artistic or GPL-1+
Files: debian/*
-Copyright:
- 2001, 2002, 2003, 2005, 2007, Joey Hess <joeyh at debian.org>
+Copyright: 2010-2011, Jonathan Yu <jawnsy at cpan.org>
+ 2011, Nicholas Bamber <nicholas at periapt.co.uk>
2009, gregor herrmann <gregoa at debian.org>
- 2010, Jonathan Yu <jawnsy at cpan.org>
- 2011, Nicholas Bamber <nicholas at periapt.co.uk>
+ 2001-2007, Joey Hess <joeyh at debian.org>
License: Artistic or GPL-1+
License: Artistic
More information about the Pkg-perl-cvs-commits
mailing list