[svn:parrot] r47180 - branches/tt1452_configure_debug/t/steps/auto
jkeenan at svn.parrot.org
jkeenan at svn.parrot.org
Mon May 31 01:26:08 UTC 2010
Author: jkeenan
Date: Mon May 31 01:26:08 2010
New Revision: 47180
URL: https://trac.parrot.org/parrot/changeset/47180
Log:
Update test file to reflect change in handling of verbose debugging output.
Modified:
branches/tt1452_configure_debug/t/steps/auto/gmp-01.t
Modified: branches/tt1452_configure_debug/t/steps/auto/gmp-01.t
==============================================================================
--- branches/tt1452_configure_debug/t/steps/auto/gmp-01.t Mon May 31 01:21:09 2010 (r47179)
+++ branches/tt1452_configure_debug/t/steps/auto/gmp-01.t Mon May 31 01:26:08 2010 (r47180)
@@ -110,12 +110,12 @@
$conf->options->set( %{$args} );
$step = test_step_constructor_and_description($conf);
-my ($test, $has_gmp, $verbose);
+my ($test, $has_gmp);
$test = $step->{cc_run_expected};
$has_gmp = 0;
-$verbose = undef;
-$has_gmp = $step->_evaluate_cc_run($conf, $test, $has_gmp, $verbose);
+$conf->options->set(verbose => undef);
+$has_gmp = $step->_evaluate_cc_run($conf, $test, $has_gmp);
is($step->result, 'yes', "Got expected result");
is($conf->data->get('gmp'), 'define', "Expected value set for 'gmp'");
is($conf->data->get('HAS_GMP'), 1, "Expected value set for 'HAS_GMP'");
@@ -126,8 +126,8 @@
$test = '12345';
$has_gmp = 0;
-$verbose = undef;
-$has_gmp = $step->_evaluate_cc_run($conf, $test, $has_gmp, $verbose);
+$conf->options->set(verbose => undef);
+$has_gmp = $step->_evaluate_cc_run($conf, $test, $has_gmp);
ok(! defined($step->result), "Result undefined as expected");
is($has_gmp, 0, "gmp status unchanged");
@@ -135,10 +135,10 @@
my $stdout;
$test = $step->{cc_run_expected};
$has_gmp = 0;
- $verbose = 1;
+ $conf->options->set(verbose => 1);
capture(
sub { $has_gmp =
- $step->_evaluate_cc_run($conf, $test, $has_gmp, $verbose); },
+ $step->_evaluate_cc_run($conf, $test, $has_gmp); },
\$stdout,
);
is($step->result, 'yes', "Got expected result");
More information about the parrot-commits
mailing list