Skip to content

Commit

Permalink
Import of ERIK/Test-Functional-0.02 from CPAN.
Browse files Browse the repository at this point in the history
gitpan-cpan-distribution: Test-Functional
gitpan-cpan-version:      0.02
gitpan-cpan-path:         ERIK/Test-Functional-0.02.tar.gz
gitpan-cpan-author:       ERIK
gitpan-cpan-maturity:     released
  • Loading branch information
Erik Andreas Osheim authored and Gitpan committed Oct 21, 2014
1 parent 3789bf5 commit be85320
Show file tree
Hide file tree
Showing 8 changed files with 30 additions and 26 deletions.
7 changes: 3 additions & 4 deletions Build.PL
Expand Up @@ -3,9 +3,8 @@ use warnings;
use Module::Build;

# For the record, I'm not really sure what versions of any of these modules are
# required. I'm pretty sure this won't work with Perl 4. I'm not sure which
# Perl 5 is the minimum (if any); I haven't tested with perls under 5.8, but I
# bet 5.6 is fine.
# required. I'm pretty sure this won't work with Perls earlier than 5.6 due to
# the use of "our" etc.

my $builder = Module::Build->new(
module_name => 'Test::Functional',
Expand All @@ -16,7 +15,7 @@ my $builder = Module::Build->new(
'Test::More' => 0,
},
requires => {
'perl' => '5.0.0',
'perl' => '5.6.0',
'Data::Compare' => 0,
'Scalar::Quote' => 0,
'Test::Builder' => 0,
Expand Down
9 changes: 7 additions & 2 deletions Changes
@@ -1,4 +1,9 @@
Revision history for Test-Functional

0.01 Date/time
First version, released on an unsuspecting world.
0.02 Thu Jul 9 02:01:57 EDT 2009
- documentation bugs
- depend on perl >= 5.8.6
- fix test issue

0.01 Wed Jul 8 10:35:00 EDT 2009
- initial release
4 changes: 2 additions & 2 deletions MANIFEST
Expand Up @@ -2,7 +2,8 @@ Build.PL
Changes
lib/Test/Functional.pm
lib/Test/Functional/Conf.pm
MANIFEST
Makefile.PL
MANIFEST This list of files
META.yml
README
t/00-load.t
Expand All @@ -11,4 +12,3 @@ t/Functional.t
t/output.t
t/pod-coverage.t
t/pod.t
Makefile.PL
8 changes: 4 additions & 4 deletions META.yml
@@ -1,6 +1,6 @@
---
name: Test-Functional
version: 0.01
version: 0.02
author:
- 'Erik Osheim <erik@osheim.org>'
abstract: Perl tests in a functional style.
Expand All @@ -12,16 +12,16 @@ requires:
Scalar::Quote: 0
Test::Builder: 0
Test::More: 0
perl: 5.0.0
perl: 5.6.0
build_requires:
Test::More: 0
provides:
Test::Functional:
file: lib/Test/Functional.pm
version: 0.01
version: 0.02
Test::Functional::Conf:
file: lib/Test/Functional/Conf.pm
version: 0.01
version: 0.02
generated_by: Module::Build version 0.2808
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.2.html
Expand Down
10 changes: 5 additions & 5 deletions README
Expand Up @@ -12,7 +12,7 @@ SYNOPSIS
test { 2 * 2 } 4, "test-1";
test { 2 * 2 } eqv 4, "test-1";

# test blocks can be as simple of as involved as you want
# test blocks can be as simple or as involved as you want
test { 3 > 0 } true, "test-4";
test {
my $total = 0;
Expand Down Expand Up @@ -206,10 +206,10 @@ ETHOS
testing?) this feature is invaluable.

The various features to prematurely end the test (using *pretest()*
and/or $Test::Functional::FASTOUT) can help the developer to focus on
the problem at hand, rather than having to filter through spew [3]. This
is especially nice during test-driven development, or when trying to
increase coverage for an old and crufty module.
and/or "$Test::Functional::Conf->fastout") can help the developer to
focus on the problem at hand, rather than having to filter through spew
[3]. This is especially nice during test-driven development, or when
trying to increase coverage for an old and crufty module.

AUTHOR
Erik Osheim "<erik at osheim.org>"
Expand Down
14 changes: 7 additions & 7 deletions lib/Test/Functional.pm
Expand Up @@ -3,7 +3,7 @@ package Test::Functional;
use warnings FATAL => 'all';
use strict;

our $VERSION = '0.01';
our $VERSION = '0.02';

=head1 NAME
Expand All @@ -21,7 +21,7 @@ Test::Functional - Perl tests in a functional style.
test { 2 * 2 } 4, "test-1";
test { 2 * 2 } eqv 4, "test-1";
# test blocks can be as simple of as involved as you want
# test blocks can be as simple or as involved as you want
test { 3 > 0 } true, "test-4";
test {
my $total = 0;
Expand All @@ -48,7 +48,7 @@ This modules uses (abuses?) the ability to create new syntax via perl
prototypes to create a testing system focused on functions rather than values.
Tests run blocks of Perl, and use comparator functions to test the output.
Despite being a different way of thinking about tests, it plays well with
Test::More and friends.
L<Test::More> and friends.
=cut
use Data::Compare qw(Compare);
Expand Down Expand Up @@ -419,10 +419,10 @@ might occur, just about the expected outcome [2]. Especially when trying to test
other people's code (gray box testing?) this feature is invaluable.
The various features to prematurely end the test (using I<pretest()> and/or
C<$Test::Functional::FASTOUT>) can help the developer to focus on the problem at
hand, rather than having to filter through spew [3]. This is especially nice
during test-driven development, or when trying to increase coverage for an old
and crufty module.
C<< $Test::Functional::Conf->fastout >>) can help the developer to focus on the
problem at hand, rather than having to filter through spew [3]. This is
especially nice during test-driven development, or when trying to increase
coverage for an old and crufty module.
=head1 AUTHOR
Expand Down
2 changes: 1 addition & 1 deletion lib/Test/Functional/Conf.pm
Expand Up @@ -3,7 +3,7 @@ package Test::Functional::Conf;
use warnings FATAL => 'all';
use strict;

our $VERSION = '0.01';
our $VERSION = '0.02';

use Carp;
use Exporter;
Expand Down
2 changes: 1 addition & 1 deletion t/output.t
Expand Up @@ -2,7 +2,7 @@
use warnings FATAL => 'all';
use strict;

use Test::Builder::Tester tests => 3;
use Test::Builder::Tester tests => 21;
use Test::Functional;
use Test::More;

Expand Down

0 comments on commit be85320

Please sign in to comment.