[svn:parrot] r49441 - in trunk: . t/steps/gen

plobsing at svn.parrot.org plobsing at svn.parrot.org
Mon Oct 4 13:50:48 UTC 2010


Author: plobsing
Date: Mon Oct  4 13:50:48 2010
New Revision: 49441
URL: https://trac.parrot.org/parrot/changeset/49441

Log:
remove useless tests for now-removed gen::crypto

Deleted:
   trunk/t/steps/gen/crypto-01.t
Modified:
   trunk/MANIFEST

Modified: trunk/MANIFEST
==============================================================================
--- trunk/MANIFEST	Mon Oct  4 12:54:05 2010	(r49440)
+++ trunk/MANIFEST	Mon Oct  4 13:50:48 2010	(r49441)
@@ -1,7 +1,7 @@
 # ex: set ro:
 # $Id$
 #
-# generated by tools/dev/mk_manifest_and_skip.pl Sat Oct  2 23:46:07 2010 UT
+# generated by tools/dev/mk_manifest_and_skip.pl Mon Oct  4 13:50:13 2010 UT
 #
 # See below for documentation on the format of this file.
 #
@@ -2016,7 +2016,6 @@
 t/steps/gen/config_h-01.t                                   [test]
 t/steps/gen/config_pm-01.t                                  [test]
 t/steps/gen/core_pmcs-01.t                                  [test]
-t/steps/gen/crypto-01.t                                     [test]
 t/steps/gen/makefiles-01.t                                  [test]
 t/steps/gen/opengl-01.t                                     [test]
 t/steps/gen/platform-01.t                                   [test]

Deleted: trunk/t/steps/gen/crypto-01.t
==============================================================================
--- trunk/t/steps/gen/crypto-01.t	Mon Oct  4 13:50:48 2010	(r49440)
+++ /dev/null	00:00:00 1970	(deleted)
@@ -1,83 +0,0 @@
-#! perl
-# Copyright (C) 2008, Parrot Foundation.
-# $Id$
-# gen/crypto-01.t
-
-use strict;
-use warnings;
-use Test::More tests =>  8;
-use Carp;
-use lib qw( lib );
-use_ok('config::gen::crypto');
-use Parrot::Configure::Options qw( process_options );
-use Parrot::Configure::Step::Test;
-use Parrot::Configure::Test qw(
-    test_step_constructor_and_description
-);
-
-########## regular ##########
-
-my ($args, $step_list_ref) = process_options(
-    {
-        argv => [ ],
-        mode => q{configure},
-    }
-);
-
-my $conf = Parrot::Configure::Step::Test->new;
-$conf->include_config_results( $args );
-
-my $serialized = $conf->pcfreeze();
-
-my $pkg = q{gen::crypto};
-$conf->add_steps($pkg);
-$conf->options->set( %{$args} );
-my $step = test_step_constructor_and_description($conf);
-
-ok(-f $step->{digest_pmc_template}, "Able to locate source code file");
-
-my $has_crypto_orig = $conf->data->get('has_crypto');
-$conf->data->set( has_crypto => undef );
-my $ret = $step->runstep($conf);
-ok( $ret, "runstep() returned true value" );
-is($step->result(), q{skipped}, "Got expected result");
-# re-set for next test
-$conf->data->set( has_crypto => $has_crypto_orig );
-$step->set_result( q{} );
-
-$conf->replenish($serialized);
-
-pass("Completed all tests in $0");
-
-################### DOCUMENTATION ###################
-
-=head1 NAME
-
-  gen/crypto-01.t - test gen::crypto
-
-=head1 SYNOPSIS
-
-    % prove t/steps/gen/crypto-01.t
-
-=head1 DESCRIPTION
-
-The files in this directory test functionality used by F<Configure.pl>.
-
-The tests in this file test gen::crypto.
-
-=head1 AUTHOR
-
-James E Keenan
-
-=head1 SEE ALSO
-
-config::gen::crypto, F<Configure.pl>.
-
-=cut
-
-# Local Variables:
-#   mode: cperl
-#   cperl-indent-level: 4
-#   fill-column: 100
-# End:
-# vim: expandtab shiftwidth=4:


More information about the parrot-commits mailing list