Skip to content

Commit 2fe8266

Browse files
committed
Tests for RT #126110 and RT #126115.
1 parent 7a34a79 commit 2fe8266

File tree

1 file changed

+7
-1
lines changed

1 file changed

+7
-1
lines changed

S02-names/is_default.t

Lines changed: 7 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
use v6;
22
use Test;
33

4-
plan 108;
4+
plan 110;
55

66
# L<S02/Variables Containing Undefined Values>
77

@@ -231,4 +231,10 @@ plan 108;
231231
# RT #126104
232232
lives-ok { EVAL 'my Any $a is default(3)' }, 'Default value that is subtype of constraint works fine';
233233

234+
# RT #126110
235+
lives-ok { EVAL 'my $a is default(Mu); 1' }, 'Mu as a default value on an unconstrained Scalar works';
236+
237+
# RT #126115
238+
lives-ok { EVAL 'my $a is default(Failure.new); 1' }, 'Failure.new as a default value on an unconstrained Scalar works';
239+
234240
# vim: ft=perl6

0 commit comments

Comments
 (0)