Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

more typed exceptions

  • Loading branch information...
commit 2002a2fe7775a1f4c4d7e8ea82b165d0f28216a1 1 parent 31654a6
@moritz moritz authored
Showing with 9 additions and 0 deletions.
  1. +9 −0 S32-exceptions/misc.t
View
9 S32-exceptions/misc.t
@@ -1,6 +1,7 @@
use v6;
use Test;
+#?DOES 1
sub throws_like($code, $ex_type, *%matcher) {
my $msg;
if $code ~~ Callable {
@@ -114,4 +115,12 @@ throws_like 'sub f(*@a, $b?) { }', X::Parameter::WrongOrder,
misplaced => 'optional positional',
after => 'variadic';
+#?rakudo skip 'parsing regression'
+throws_like '#`', X::Syntax::Comment::Embedded;
+#?rakudo skip 'parsing regression'
+throws_like '=begin', X::Syntax::Pod::BeginWithoutIdentifier;
+
+throws_like '@', X::Syntax::SigilWithoutName;
+throws_like '1∞', X::Syntax::Confused;
+
done;
Please sign in to comment.
Something went wrong with that request. Please try again.