We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 7a34a79 commit 2fe8266Copy full SHA for 2fe8266
S02-names/is_default.t
@@ -1,7 +1,7 @@
1
use v6;
2
use Test;
3
4
-plan 108;
+plan 110;
5
6
# L<S02/Variables Containing Undefined Values>
7
@@ -231,4 +231,10 @@ plan 108;
231
# RT #126104
232
lives-ok { EVAL 'my Any $a is default(3)' }, 'Default value that is subtype of constraint works fine';
233
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
240
# vim: ft=perl6
0 commit comments