diff options
author | Nicolas R <nicolas@atoomic.org> | 2020-08-10 11:43:51 -0600 |
---|---|---|
committer | Nicolas R <nicolas@atoomic.org> | 2020-08-10 17:26:40 -0600 |
commit | c8799aff0116bda7147dbf4e7a01f814524ee6fe (patch) | |
tree | 64ef46ee94fcf432d2bb64ab235d7a4af56d5f9b /dist/Devel-PPPort/t/sprintf.t | |
parent | 5b2d4421f503a2f8d092d0e49cc851e2f89a8a4d (diff) | |
download | perl-c8799aff0116bda7147dbf4e7a01f814524ee6fe.tar.gz |
Update Devel-PPPort to release 3.59
Note that test files are not under file version
control anymore as they are generated files.
Diffstat (limited to 'dist/Devel-PPPort/t/sprintf.t')
-rw-r--r-- | dist/Devel-PPPort/t/sprintf.t | 58 |
1 files changed, 0 insertions, 58 deletions
diff --git a/dist/Devel-PPPort/t/sprintf.t b/dist/Devel-PPPort/t/sprintf.t deleted file mode 100644 index 50062d4e23..0000000000 --- a/dist/Devel-PPPort/t/sprintf.t +++ /dev/null @@ -1,58 +0,0 @@ -################################################################################ -# -# !!!!! Do NOT edit this file directly! !!!!! -# -# Edit mktests.PL and/or parts/inc/sprintf instead. -# -# This file was automatically generated from the definition files in the -# parts/inc/ subdirectory by mktests.PL. To learn more about how all this -# works, please read the F<HACKERS> file that came with this distribution. -# -################################################################################ - -use FindBin (); - -BEGIN { - if ($ENV{'PERL_CORE'}) { - chdir 't' if -d 't'; - unshift @INC, '../lib' if -d '../lib' && -d '../ext'; - require Config; Config->import; - use vars '%Config'; - if (" $Config{'extensions'} " !~ m[ Devel/PPPort ]) { - print "1..0 # Skip -- Perl configured without Devel::PPPort module\n"; - exit 0; - } - } - - use lib "$FindBin::Bin"; - use lib "$FindBin::Bin/../parts/inc"; - - die qq[Cannot find "$FindBin::Bin/../parts/inc"] unless -d "$FindBin::Bin/../parts/inc"; - - sub load { - require 'testutil.pl'; - require 'inctools'; - } - - if (2) { - load(); - plan(tests => 2); - } -} - -use Devel::PPPort; -use strict; -BEGIN { $^W = 1; } - -package Devel::PPPort; -use vars '@ISA'; -require DynaLoader; -@ISA = qw(DynaLoader); -Devel::PPPort->bootstrap; - -package main; - -my($l, $s) = Devel::PPPort::my_sprintf(); -is($l, 8); -is($s, "foobar42"); - |