Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse code

test for extra information in X::Syntax::NegatedPair

  • Loading branch information...
commit 425b7869da14b0ae140c9a0f82bc892627f43b46 1 parent 279df78
Moritz Lenz moritz authored

Showing 1 changed file with 1 addition and 1 deletion. Show diff stats Hide diff stats

  1. +1 1  S32-exceptions/misc.t
2  S32-exceptions/misc.t
@@ -87,7 +87,7 @@ throws_like 'undef', X::Obsolete,
87 87 throws_like 'my $a::::b', X::Syntax::Name::Null;
88 88 throws_like 'unless 1 { } else { }', X::Syntax::UnlessElse;
89 89 throws_like 'for my $x (1, 2, 3) { }', X::Syntax::P5;
90   -throws_like ':!foo(3)', X::Syntax::NegatedPair;
  90 +throws_like ':!foo(3)', X::Syntax::NegatedPair, key => 'foo';
91 91 throws_like 'my $0', X::Syntax::Variable::Numeric;
92 92 throws_like 'my sub f($0) { }', X::Syntax::Variable::Numeric, what => 'parameter';
93 93 throws_like 'my $<a>', X::Syntax::Variable::Match;

0 comments on commit 425b786

Please sign in to comment.
Something went wrong with that request. Please try again.