Permalink
Fetching contributors…
Cannot retrieve contributors at this time
23 lines (17 sloc) 496 Bytes
use v6;
use Test;
plan 1;
# various tests for built-in types
# L<S02/Built-In Data Types>
# RT #122094
# TODO: better test (e.g. typed exception instead of testing for backend specific error messages
{
throws-like {
my $foo = ObjAt.new(:val("test"));
$foo ~~ /"foo"/;
},
Exception,
message => / 'Too few positionals passed; expected 2 arguments but got 1' /,
'no segfault in ObjAt initalization when passing bogus named parameters';
}
# vim: ft=perl6