summaryrefslogtreecommitdiff
path: root/dist/Devel-PPPort/t/snprintf.t
diff options
context:
space:
mode:
Diffstat (limited to 'dist/Devel-PPPort/t/snprintf.t')
-rw-r--r--dist/Devel-PPPort/t/snprintf.t58
1 files changed, 0 insertions, 58 deletions
diff --git a/dist/Devel-PPPort/t/snprintf.t b/dist/Devel-PPPort/t/snprintf.t
deleted file mode 100644
index 513fc6b486..0000000000
--- a/dist/Devel-PPPort/t/snprintf.t
+++ /dev/null
@@ -1,58 +0,0 @@
-################################################################################
-#
-# !!!!! Do NOT edit this file directly! !!!!!
-#
-# Edit mktests.PL and/or parts/inc/snprintf 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_snprintf();
-is($l, 8);
-is($s, "foobar42");
-